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内 容 简 介 


本 书 是 教育 部 “高 等 教育 面向 21 世纪 教学 内 容 和 课程 体系 改革 计划 "的 研究 成 果 . 全 书 共 讲述 
15 个 实验 ,它们 分 别 为 : 微 税 分 基础 ,怎样 计算 x, 最 佳 分 数 近似 值 .数列 与 极 数 ,素数 ,概率 ,几何 变换 ， 
义 体 运动 ,迭代 (一 )- “方程 求 租 , 杂 优 ,最 速 降 线 , 选 代 ( 二 ) 一 分 形 :迭代 (三 ) 一 混沌, 密码, 补 等 
上 几 和 柯 定理 的 袜 器 证 明 . 最 后 还 附 有 Mathematica 简介 . 

本 书 适 用 于 高 等 学 校 各 培 业 本 科 生 ,以 及 具有 初步 的 商 等 数学 知识 和 计算 机 知识 的 其 他 读 老 . 
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本 书 是 高 等 院 按 数学 实验 课 的 教材 .适用 于 全 国 理 、 工 . 农 . 医 . 文 各 类 高 
等 院 校 , 凡 是 开设 高 等 数学 课 的 学 校 都 可 以 使 用 . 

在 大 学 中 开设 数学 实验 课 , 是 教育 部 组 织 的 “高 等 教育 面向 21 世纪 教学 
内 容 和 课程 体系 改革 计划 ?课题 组 的 重要 研究 成 果 . 该 课程 的 教学 对 象 , 是 全 
国 所 有 高 校 , 不 分 理工 农 医 等 科 类 的 本 科 生 ,课程 目的 ,是 使 学 生 掌握 数学 实 
验 的 基本 思想 和 方法 , 即 不 把 数学 看 成 先 验 的 还 辑 体系 ,而 是 把 它 视 为 一 门 
“实验 科学 ", 从 问题 出 发 ,借助 计算 机 ,通过 学 生 亲 自 设 计 和 动手 ,体验 解决 问 
题 的 过 程 ,从 实验 中 去 学 习 、 探 索 和 发 现 数学 规律 . 

这 是 在 我 国 高 等 学 校 中 新 开设 的 一 门 课程 ,还 处 于 摸索 和 试点 阶段 . 课程 
的 指导 思想 .上 课 内 容 和 方式 都 有 待 于 在 试点 中 逐步 明确 . 该 课程 在 数学 专业 
和 非 数学 专业 都 要 开设 ,因此 也 是 数学 专业 课题 组 和 非 燥 学 专业 课题 组 共同 
的 任务 . 

中 国 科技 大 学 数学 系 参 加 了 数学 专业 和 理科 非 数学 专业 面向 21 世纪 教 
学 内 容 和 课程 体系 改革 的 两 个 课题 组 ,并 且 受 课题 组 委托 进行 了 开设 数学 实 
验 课 的 试点 ,产生 了 这 本 教材 . 参加 这 一 试点 工作 的 有 我 系 的 李 尚 志 教 授 、 陈 
发 来 教授 、 王 树 禾 教授 、 修 定 下 教授、 吴 砍 华 副 教授 、 张 葛 华 副教授 等 . 为 了 真 
正 检 验 我 们 的 试点 课 的 效果 ,看 它 是 否 能 够 引起 学 生 的 兴趣 ,是 否 能 够 达到 预 
起 的 教学 效果 ,是否 适 合 于 各 不 同 专业 的 学 生 , 我 们 采用 了 面向 全 校 的 选修 课 
的 形式 ,让 全 校 所 有 专业 的 学 生 自 感 自由 选课 . 结果 ,在 1998 年 和 1999 年 的 
两 次 试点 中 ,全 校 各 专业 选课 的 学 生 人 教 达 到 240 人 左右 , 几 平 涵盖 了 所 有 的 
系 科 和 专业 ,其 中 数学 系 学 生 约 占 1/3, 非 数学 系 的 学 生硬 2/3. 学 生 们 不 但 对 
于 听 诬 很 有 兴趣 ,而 且 主 动 积极 地 完成 所 布置 的 实验 作业 ,在 作业 中 表现 出 了 
很 大 的 兴趣 和 创造 性 ,还 对 开设 这 门 课程 的 必要 性 和 如 何 改进 提出 了 很 多 很 
好 的 意见 . 

以 下 是 我 们 对 于 开设 数学 实验 课 的 想法 和 做 法 ,也 是 这 本 书 的 主要 指导 

一 . 指导 思想 : 

主要 是 让 学 上 生 自 己 通 过 动手 去 体验 ,而 不 在 于 教 完 他 们 多 少 内 容 . 不 追求 
内 容 的 系统 性 、 完 整 性 ,而 应 当 激 发 学 生 自己 动手 和 探索 的 兴趣 . 

我 们 参照 了 物理 实验 课 、 化 学 实验 课 的 内 容 和 上 课 方 法 :这 些 实验 课 并 不 
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需要 花 多 几时 间 讲 解 理论 和 原理 ,讲解 理论 和 原理 是 物理 、 化 学 的 理论 课程 的 
任务 . 实验 课 主要 是 学 生 自 己 做 实验 ,观察 和 分 析 实 验 结果 .我 们 认为 ,数学 实 
验 也 应 当 这 样 ,不 要 在 数学 实验 课 上 讲 很 多 理论 ,也 不 应 当 花 很 多 时 间 和 精力 
来 教 算 法 . 但 是 ,物理 .化 学 实验 课 往 往 是 把 实验 的 每 个 步骤 都 给 学 生 规 定 得 
很 详细 ,学 生 只 要 按 步 就 班 完成 这 些 步 骤 , 而 实验 的 结果 也 是 预先 就 知道 了 
的 ， 留 给 学 生 探 索 的 余地 不 多 .我 们 在 设计 发 学 实验 课 的 时 候 就 努力 避免 这 种 
情况 ,尽量 留 些 问题 让 学 生 自己 去 设计 方法 来 解决 ,避免 把 实验 课 变 成 单纯 传 
授 计算 技术 的 课程 . 

在 设计 数学 实验 内 容 的 时 候 , 虽 然 我 们 也 有 意识 让 学 生 通 过 实验 学 会 一 
些 革 本 的 方法 ,但 是 我 们 并 不 以 这 些 方法 为 线索 组 织 课 程 内 容 . 我 们 设计 了 一 
些 能 够 引起 学 生 兴 趣 的 问题 ,每 个 实验 围绕 解决 一 个 或 几 个 问题 来 展开 ,教学 
生 使 用 若干 种 方法 来 解决 所 给 的 问题 ,在 解决 问题 中 学 习 和 热 悉 这 些 方法 , 自 
己 观察 结果 ,得 出 结论 .比如 ,围绕 计算 圆周 率 的 近似 值 这 一 问题 学 习 数 值 积 
分 法 、 泰 勒 级 数 法 、 和 蒙特 卡 罗 法 .分数 向 无 理 数 的 最 住 这 近 ; 围 绕 光 的 折射 定律 
和 有 最速 降 线 学 习 各 种 优化 方法 ; 国 绕 天 体 运动 规律 学 习 微 分 方程 的 教 值 解法 ; 
等 等 

我 们 认为 ,尽管 数学 专业 和 非 数 学 专业 的 学 生 的 数学 课程 的 难 易 程度 有 
很 大 的 差别 ,但 数学 实验 课 对 他 们 来 说 却 不 必 有 多 大 的 差别 ,基本 的 部 分 完全 
可 以 是 共同 的 ,只 有 一 些 理论 较 深 的 部 分 可 以 根据 各 自 的 情况 有 所 取舍 . 我 们 
在 试点 中 的 体会 是 ,学 生 完成 实验 作业 的 难 易 主要 不 在 于 对 数学 知识 的 掌握 
程度 ,而 是 运用 计算 机 能 力 的 差别 . 我 们 感到 ,开设 数学 实验 课 以 二 年 级 为 宜 ， 
让 学 生 学 过 高 等 数学 中 必要 的 基本 概念 即 可 ,不 必 学 过 很 多 的 数学 定理 . 这 
样 , 就 可 以 有 上 比较 多 的 未 知 的 东西 供 他 们 去 探索 . 已 学 的 东西 太 多 ,学 生 对 探 
索 的 兴趣 反而 下 降 . 实际 上 ,选修 我 们 课程 的 也 有 很 多 一 年 级 学 生 , 其 中 也 有 
许多 人 的 作业 做 得 很 好 . 因此 ,在 一 年 级 下 学 期 开设 这 门 课程 也 是 可 以 的 . 

我 们 设想 ,数学 实验 可 以 包括 两 部 分 主要 内 容 : 第 一 部 分 是 基础 部 分 , 国 
绕 高 等 数学 的 基本 内 容 , 让 学 生 充 分 利用 计算 机 及 软件 的 数值 功能 和 国 形 功 
能 展示 基本 概念 与 结论 ,去 体验 如 何 发 现 . 总 结 和 应 用 数学 规律 . 另 一 部 分 是 
高 级 部 分 ,以 高 等 数学 为 中 心 向 速 绑 学 科 发 散 , 可 涉及 到 微分 几何 ,数值 方法 ， 
数理 统计 ,图 论 与 组 合 ,微分 方程 ,运筹 与 优 忆 等 ,也 可 涉及 到 现代 新 兴 的 学 科 
和 方向 ,如 分 形 、 混 沌 等 . 这 部 分 的 内 容 可 以 是 新 的 ,但 不 必 强 调 完整 性 ,教师 
介绍 一 点 主要 的 思想 ,提出 问题 和 任务 ,让 学 生 尝 试 通过 自己 动手 和 观察 实验 
结果 去 发 现 和 总 结 其 中 的 规律 . 即使 总 结 不 出 来 也 没有 关系 , 留 持 将 来 再 学 ， 
有 兴趣 的 可 以 自己 去 找 参 考 书 寻找 答案 . 比如 我 们 设计 了 一 个 实验 让 学 生肖 
分 形 的 图 形 .这些 图 形 的 高 法 很 简单 ,但 画 出 来 的 丫 果 却 让 学 生 感 到 神奇 , 引 
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起 他 们 极 大 的 兴趣 ,很 多 学 生 自 己 到 图 书馆 找 了 有 关 分 形 的 参考 书 来 看 

二 .关于 数学 实验 课 与 一 些 相 关 课程 的 差别 和 联系 ,我 们 有 如 下 看 法 : 

“和 与 计算 方法 、 统 计 方法 .优化 方法 等 课程 的 区 别 和 联系 :数学 实验 课 尽 管 
” 志 要 介绍 和 用 到 数值 计 詹 洲 法 .统计 方法 ,优化 方法 ,但 是 不 应 取代 这 些 课程 ， 
否则 ,学 生 会 失去 兴趣 ,认为 反正 还 要 上 这 些 课程 ,何必 上 数学 实验 课 呢 ? 为 划 
清 这 一 界限 ,我 们 主张 ,数学 实验 课 所 用 到 的 方法 应 当 上 比较 简单 和 浅显 ,可 以 
由 高 等 数学 课程 中 的 内 容 很 决 推出 来 ,( 其 推导 难度 只 应 相当 于 高 等 数学 作业 
题 ), 而 不 需要 花 时 间 和 精力 作 专 门 的 讲解 .而 关于 专门 的 .比较 精细 的 专门 方 
法 的 讲解 , 则 留 给 这 些 课程 去 完成 . 当然 ,这 些 课程 本 身 也 应 改革 ,不 能 纸 上 谈 
医 , 也 应 有 学 生 自 己 动手 实践 作为 重要 环节 . 

与 数学 建 模 课 的 区 别 和 联系 :数学 建 模 与 数学 实验 课 都 要 用 到 计算 机 . 但 
数学 建 模 课 是 让 学 生 学 会 利用 教学 知识 和 计算 机 手段 来 解决 实际 问题 ,而 数 
学 实验 课 侧 重 于 在 计算 机 的 帮助 下 学 习 数 学 知识 . 一 个 是 用 ,一 个 是 学 ,两 者 
的 目标 不 同 . 从 选材 来 说 ,我 们 主张 两 者 都 要 从 问题 出 发 而 不 从 概念 出 发 - 但 
数学 建 模 强调 问题 的 实用 性 而 不 强调 普遍 意义 ,解决 问题 本 身 就 是 目的 ;而 教 
学 实验 课 可 以 从 理论 问题 出 发 ,也 可 由 实际 问题 出 发 ,但 这 个 理论 问题 或 实际 
问题 最 好 是 比较 经 典 的 .具有 普遍 意义 ,让 学 生 以 解决 问题 为 线索 总 结 规律 ， 
学 到 知识 . 当然 ,数学 实验 课 可 以 作为 数学 建 模 课 的 预备 课程 ,使 学 生 可 以 更 
快 地 掌握 数学 建 模 的 基本 方法 和 机 能 . 

与 高 等 数学 课 的 区 别 和 联系 :都 是 为 了 学 知识 ,但 学 习 方 法 很 不 相同 .高 
等 数学 课 主 要 是 由 教师 传 捞 知识 ,而 数学 实验 课 则 项 望 通过 学 生 自己 动手 和 
观察 去 体会 这 些 知 识 是 怎样 得 出 来 的 . 

与 计算 机 课程 的 联系 :对 于 非 计 算 视 专业 的 学 生来 说 ,计算 机 知识 (包括 
计算 机 语言 以 及 软件 的 使 用 等 ) 只 是 一 种 工具 .好比 学 语言 ,不 能 只 停留 于 学 
一 个 个 的 单字 和 一 条 条 的 语法 规则 ,而 必须 通过 阅读 课文 来 学 . 并 且 , 学 了 就 
要 用 ,就 要 读 报纸 , 读 小 说 等 . 教 计算 宙 语 言 也 是 这 样 ,应 当 结 合 解 决 一 定 的 问 
题 来 学 ,学 了 就 要 用 来 解决 问题 , 才 有 兴趣 学 ,才能 学 得 会 , 才 不 会 忘记 . 但 现 
在 大 学 里 的 计算 机 语言 课 有 时 和 其 它 课 程 ( 特 别 是 数学 课程 ?脱节 ，, 导 致 很 多 
学 生 学 习 计 算 机 语言 也 只 是 为 了 得 学 分 , 考 过 了 就 忘 了 ,到 高 年 级 真 需要 用 的 
时 候 还 得 重新 复习 . 开设 数学 实验 课 有 助 于 改变 这 种 状况 . 数学 实验 课 适 所 学 
生 学 好 计算 机 知 识 来 解决 数学 问题 ,数学 实验 课 又 为 计算 宙 课 程 提 人 殿 了 大 量 
真 刀 真 枪 的 练习 机 会 .二 者 的 结合 势必 真正 提高 学 生 对 于 计 并 宙 知识 的 掌握 
水 平和 应 用 的 能 力 ,使 计算 机 课程 可 以 用 更 少 的 课时 取得 更 好 的 效果 . 

数学 实验 课 的 开设 ,不 己 本 身 就 是 高 等 数学 课程 体系 的 一 项 改革 ,而 且 必 
将 促进 其 它 许多 相关 课程 的 改革 ， 
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三 .使 用 本 书 的 注意 事项 : 

本 书 可 以 说 是 像 人 聊 高 }》 而 不 像 《 三 国 演义 》, 不 强调 系统 性 ,各 个 实验 基本 
上 是 独立 的 . 后 面 的 实验 一 般 不 会 用 到 前 面 的 实验 的 知识 (但 也 有 上 乒 今 例 
外 ). 实验 安排 的 顺序 类 本 上 是 由 易 到 难 , 基 础 内 容 坟 前, 较 高 级 的 扩散 性 的 内 
容 在 后 (但 也 不 是 绝对 的 ). 员 然 内 容 的 编 徘 实际 上 还 是 有 一 定 的 系统 性 ,但 我 
们 并 不 强调 这 一 系统 性 . 我 们 强调 的 是 从 问题 出 发 ,自己 动手 做 ,自己 观察 结 
果 ， 并 且 鼓 励 学 生 自 己 发 明 出 新 的 实验 . 

因此 ,在 使 用 本 书 时 ,不 必 按 贤 序 从 头 到 尾 依 次 做 各 个 实验 ,更 不 必 全 部 
做 . 可 以 根据 各 学 校 和 学 生 的 情况 选 做 其 中 一 部 分 实验 . 我 们 自己 的 做 法 是 : 
每 两 周 做 一 个 实验 ,整个 课程 做 8 个 到 9 个 实验 . 也 可 以 老师 讲 8 到 9 个 实 
验 , 介 只 要 求学 生 在 一 学 期 中 完成 4 个 到 5 个 实验 ,并 且 欢 迎 他 们 以 后 自己 完 
成 更 多 的 实验 ,有 些 学 校 暂 时 没有 时 间 完 整 开设 数学 实验 课 , 可 以 先 在 高 等 数 
学 课 中 结合 课程 内 容 安 排 做 某 些 实验 , 黄 至 可 以 在 计算 机 课程 中 作为 作业 安 
排 做 菜 些 实验 . 总 之 ,只 要 认真 去 做 ,做 一 个 实验 就 有 一 分 收获 . 

在 每 次 实验 中 ,我 们 的 作法 是 先 由 教师 讲 两 小 课时 ,主要 是 提出 问题 , 适 
当 分 绍 问题 的 背 票 ,介绍 主要 的 实验 原理 和 方法 . 然后 就 让 学 生 自 己 动手 去 
做 ,自己 去 折腾 ,去 观察 ,通过 观察 得 出 结论 .本 来 ,实验 站 果 一 般 都 可 以 用 理 
论 推 导出 来 ,但 这 绝 不 是 本 课程 的 目的 ,教师 千 万 不 要 花 很 多 时 间 去 作 这 种 理 
论 推 导 , 最 好 也 不 要 预先 告诉 学 生 实 验 的 结果 ,实验 结果 让 学 生 自 己 去 观察 得 
出 , 本 书 在 某 些 实验 后 而 作为 附录 作 了 这 种 推导 ,只 是 为 了 人 殿 有 兴趣 的 学 生 课 
外 阅读 之 用 , 决 不 是 供 教师 讲解 的 教材 ,也 不 作为 课程 要 求 和 考察 内 容 , 更 不 
要 以 考试 为 手段 强迫 那些 不 感 兴趣 的 学 生 去 再 懂 . 在 我 们 的 试点 中 ,有 的 学 生 
希望 少 讲 一 些 理论 ,多 给 他 们 留 一 些 自 己 探索 的 空间 ,也 有 的 学 生 项 望 多 讲 一 
些 理论 , 我 们 说 :能 够 通过 实验 使 学 生 项 望 多 学 理论 ,这 就 是 好 事情 . 将 他 们 学 
习 数 学 理论 的 兴趣 激发 起 来 了 ,胃口 吊 起 来 了 ,这 门 课 的 目的 就 达到 了 . 数学 
实验 有 是 “开胃 汤 ”, 而 不 是 大 餐 , 胡 口 吊 起 来 之 后 希望 多 " 吃 ” 一 些 , 请 到 正规 的 
“餐馆 ?去 ,学 生 可 以 通过 看 参考 书 和 学 习 其 它 课 程 来 满足 对 于 理论 学 习 的 渴 
求 . 

本 书 各 实验 大 体 上 以 Mathematica 坎 件 作为 主要 使 用 的 妆 件 ,并 至 在 一 
些 实验 后 面 附 上 了 Mathematica 程序 供 参 考 , 以 避免 学生 或 老师 在 计算 机 方 
面 花费 太 多 的 时 间 ，, 冲 淡 了 探索 数学 内 容 的 趣味 . 但 这 并 不 意味 着 本 书 的 实验 
只 能 用 Mathematica 去 做 ,更 不 意味 看 没有 Mathematica 就 不 能 做 这 些 实验 . 
实际 上 ,课本 中 对 于 计算 宙 的 要 求 也 是 相当 开放 的 ,实验 方法 的 叙述 和 建议 着 
重 于 数学 思路 ,这 些 思 路 可 以 用 Mathematica 来 实现 ,也 可 以 用 别 的 软件 或 自 
己 编 程 完成 . 


前 


ml 


了 


我 们 的 试点 课 没 有 专门 的 考试 ,评定 成 绩 的 唯一 依据 是 平时 的 实验 报告 . 
实验 报告 的 评分 的 最 基本 标准 是 要 自己 动手 ,要 写 上 自己 观察 到 的 现象 并 进 
行 分 析 . 实话 实说 ,不 能 造假 . 哪怕 观察 到 的 现 傣 与 预计 不 一 致 ,或 者 与 理论 扒 
导 的 结果 不 一 致 ,也 不 能 在 实验 报告 中 说 假 话 ,而 应 当 分 析 其 原因 ，, 找 出 改进 
的 办 法 , 重 做 实验 ,重新 得 出 结论 . 对 实验 报告 的 更 高 的 标准 是 创造 性 .对 于 有 
创造 性 的 报告 ,要 给 以 高 分 作为 鼓励 . 教师 批 收 了 实验 报告 之 后 ,要 在 下 一 次 
实验 开始 时 ,对 以 前 的 实验 中 出 现 的 优点 和 缺点 进行 评 讲 ,包括 让 学 生 套 加 
讨论 . 

以 上 是 我 们 对 于 开设 数学 实验 课 的 想法 和 作法 ,本 书 则 是 这 些 想法 和 做 
法 的 物化 和 图 化 .数学 实验 课 的 开设 在 我 国 还 是 一 件 新 的 事情 ,处 于 瓜 索 阶 
段 , 怎样 开设 ,势必 有 许多 不 同 的 想法 和 作法 . 我 们 认为 ， 现 阶段 应 当 鼓 励 各 种 
不 同 的 想法 和 作法 ,各 自 进行 自己 的 探索 和 试点 , 可 以 而 且 应 当 相 互 交 流 , 但 
不 必 统 一 ,也 不 必 争 论 哪 种 做 法 更 好 . 现在 首先 是 要 先 于 起 来 ,经 过 车 于 年 实 
践 去 积累 和 总 结 经 验 , 棚 据 实践 的 效果 来 逐渐 完善 和 成 熟 . 

由 于 时 间 比 较 仓 促 , 我 们 自己 的 试点 还 很 不 完善 ,本 书 的 写作 中 的 不 完善 
和 芍 漏 之 处 一 定 不 少 .现在 的 这 本 书 只 能 算 个 毛坯 , 先 供 自 己 和 大 家 使 用 起 
来 ,在 使 用 中 改进 .希望 在 不 久 的 将 来 能 将 本 节 改 得 更 好 . 

感谢 两 个 教改 课题 组 的 负 焉 人 着 码 铁 教授 和 美 怕 允 教授 , 正 是 在 他 们 的 
领导 下 才 使 我 们 开始 了 数学 实验 的 教改 试点 , 才 有 可 能 产生 这 本 书 . 数学 实验 
课程 试点 的 成 功 , 还 离 不 开 中 国 科技 大 学 和 数学 系 的 领导 的 支持 ,以 及 学 校 各 
部 门 . 特 别 是 教务 部 门 的 支持 ,他 们 对 教育 改革 的 一 贯 支持 ,以 及 在 全 校 范 园 
内 造成 的 摘 教 疏 的 热烈 而 宽松 的 气氛 ,是 我 们 作出 成 绩 的 重要 保证 . 感谢 数学 
系 玉树 条 教授 、 亿 定 簿 教授 参加 试点 和 讲课 ,感谢 选修 这 门 课程 的 广大 学 生 ， 
正 是 他 们 的 积极 认真 地 参与 , 才 使 得 我 们 开设 数学 实验 课 的 试点 搞 得 有 声 有 
色 ,使 本 节 的 指导 思想 和 内 容 得 以 形成 和 完善 - 

在 本 书 的 写作 过 程 中 ,我 们 参考 了 由 Mount Holyoke Coliege( 美 ) 编 写 
的 ,清华 大 学 和 白峰 形 和 茜 大 用 翻译 的 ,高 等 教育 出 版 社 与 施 兽 林 格 出 版 社会 作 
出 版 的 《数学 实验 室 》 一 书 , 并 且 受 到 启发 . 在 此 感谢 该 书 的 作者 、 译 者 和 出 
版 者 . 
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实验 一 ” 微 积分 基础 
本 实验 的 日 的 是 :学 习 使 用 Mathematica 的 一 些 基 本 功能 来 验证 或 观察 
得 出 微 积分 学 的 几 个 基本 结论 . 


Mathematica 是 一 个 符号 计算 系统 . 它 可 以 帮助 你 很 容易 进行 初等 数学 
和 高 等 数学 中 的 数值 计算 、 符 号 计算 、 画 图 等 各 种 事情 . 


1.1 西数 及 其 图 象 
Mathematica 画 区 间 [a,6b] 上 的 函数 y 二 f(r) 的 图 象 的 语句 的 格式 是 ， 


Plot[f ,(x,avb 门 


画 参 数 方程 zx = f(2),y 一 g(t) ,t € [a1b]j 所 表述 的 曲线 的 语句 的 格 
式 是 : 


ParametricPlot[ {f,g;, {t,a,b)] 


《]) 在 同一 坐标 系 里 作出 函数 yy 一 x 一 6z 十 2 及 其 导 函 教 交 一 3z2z 一 6 
约 图 象 . Mathematica 语 身 如 下 : 


Plot[x 3— 6x++ 2,3xX 2— 6,{xX,— 5,5)] 


注 : 这 里 画 的 是 区 间 [一 5,5」 上 的 图 象 . 你 也 可 选 别 的 区 间 试 试 . 

观察 以 下 现象 : 

0) 归 y 记 0, 达 0 时 yy 的 图 象 的 升降 情况 . 当 y 一 0 时 yy 是 否 有 要 大 全 
或 极 小 值 ? 

(ii? 当 y 上 升 或 下 降 时 yy 的 图 象 的 西 包 情况. 当 y' 取 极 人士 时 Y 的 图 象 是 


Tr EE mmmn im- 一 ~ 一 一 一 
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否 出 现 拟 点 ? 
(iii) 观 察 得 出 方程 y 一 0 的 根 的 近似 值 C ,比如 a 二 2. 再 用 以 下 语句 求 2 
附近 的 根 的 更 精确 的 值 : 


FindRoot[x- 3— 6x + 2,{x,2}] 


求 根 的 原理 是 :将 防 数 y= 二 f(z) 在 x = 二 a 附近 看 作 一 次 函数 y 过 了 (a) 十 
广 (e) (zx 一 a) ,其 中 f(a) 二 3a: 一 6 是 y 在 x = 二 a 处 的 导数 值 . 认为 一 次 方 
程 fla) 十 产 (a)j(x 一 a) 二 0 的 解 


a fla) 
, f(a) 


是 比 & 更 好 的 近似 值 . 用 它 代 替 a 再 求 出 根 的 更 好 的 近似 值 . 这 个 方法 叫做 牛 
顿 切线 法 . 本 例 中 由 “ 求 ai 的 过 程 可 以 用 下 面 的 语句 来 定义 : 


gLa_ :一 ah 一 (a 3 一 18 十 2)7/(3a 2— 6) 


这 里 在 定义 函数 g 时 用 a_ 代表 变量 a 是 等 待 在 应 用 时 将 a 代入 具体 和 值 . 从 初 
始 值 2 出 发 用 函数 g 求 根 时 , 先 求 g (2) ,再 求 glg (2)), 再 求 g(gCg (2)))， 
"… . 直到 得 到 一 个 数 ao 使 g(ao) 一 au , 即 Fa 二 0, a6 就 是 所 求 的 根 .在 
Mathematica 中 ,将 函数 g 对 2 连续 作用 若 于 次 (比如 作用 4 次 ), 并 且 列 出 每 
次 作用 的 结果 ,可 以 用 下 面 的 语句 实现 


NestList[g,2,4] 


(Civ) 观 察 得 出 使 画 教 y 取 家 大 或 极 小 值 的 工 值 的 近似 值 zx， 再 用 以 下 语 
向 求 ze 附近 的 极 大 或 极 小 值 点 的 更 精确 的 值 . 


FindMinimum[x” 3— 6x+2,{x,xo)] 


另 选 函 教 了 一 xz) 研究 上 述 问题 . 
(2) 分 别 作出 函数 y 一 sin 二 在 区 间 [一 1,1], [一 0.1,0.1]， 


[一 0.01,0.01] 的 图 条, 观察 图 象 在 x 二 0 附近 的 形状 . 
在 同一 坐标 系 中 作出 点 集 上 一 {(1/Rsin 11 守信 2 000) ,观看 点 集中 
隐藏 了 什么 图 象 .Mathematica 作 图 语句 为 : 


1.1 落 数 及 其 图 象 3 


t 一 Table[ {1/k,Sin[k]},{k,1,2000}] 《x 定义 点 集 t.) 

ListPlot[t] (x 画 出 点 全 ft 中 所 有 的 点 .) 

ListPlot[t,PlotJoined 一 汪 >True] (x 画 出 中 的 点 依次 连接 成 的 光 
滑 曲 线 . 》 


注 : 圆 括号 中 星 号 * 后 面 是 对 语句 作用 的 说 明 . 
(3) 作 出 阴 数 y 二 Sn 在 区 周 [一 0.1,0.1] 上 的 图 象 ,观察 图 象 在 
工 二 0 附近 的 形状 . 


级 数 与 无 穷 乘积 . 

(1) 在 同一 坐标 系 里 作出 通 数 y 二 sin + 和 它 的 Taylor 展开 式 的 前 几 项 
构成 的 多 项 式 浮 数 yy 一 工 一 于 ,y 一 x 一 如 十 向,… 的 图 象 .观察 这 些 多 项 
式 函 数 的 图 人 象 向 y 二 sin 7 的 图 人 象 通 近 的 情况 . 


(2) 分 别 取 n 二 10,20 , 却 出 通 数 yy 一 六 TSin(2k 一 1)z 在 区 间 


ee i 函数 ? 
(3) 分 别 取 n 二 5,10,15 ,在 同一 坐标 系 里 作出 通 数 f(x) 一 sin x 与 

pz) = zx， TI|1 一 忆 已] 在 区 间 [一 2r,2x] 上 的 图 象 , 观 察 当 增加 时 

p(x) 的 图 象 向 Sin 的 图 象 通 近 的 现象 . 注意 郧 数 请 (z) 的 根 士 Ar (下 一 0,1， 


2, sn) 也 都 是 f(7Y) 的 根 , 且 两 个 通 数 在 工 一 0 处 的 导数 相同 .在 任何 有 限 
区 间 上 , 当 关 一 co 时 泗 数 万 (z) 通 近 sin XX. 


完成 练习 2 的 三 项 作 图 任务 的 Mathematica 语句 分 别 基 ， 


s[x_,n_]: 一 Sum[( 一 1)” (k— Dx” Ck— DD/(C2k ~ D1!), 
{k,1,n)J 

Plot[L {Sin[xi,s[x,2],s[x,3],s[x,4]}, {x, 一 2Pi,2Pi}] 

ffx_,n_]:= Som[SinCk x xJ/k,{k,1,n,2}] 

Plot[f[x,10], {x, 一 2Pi,2Pi}] 

p[x._,n.]:= x*#Product[l ~ x” 2/(k” 2Pi” 2),(k,1,n}] 

Plot[ {Sin[x ,pfx,5]}, {x, — 2Pi, 2Pi} ] 
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以 上 语句 中 的 s[x,2]… 等 可 以 换 成 s[x,5]-… 等 , fLx,10],p[x,s] 可 以 
换 成 f[x,20],p[x,10],pLx,;15] 等 . 


1.2 数 e 


中 学 学 的 对 数 以 10 为 底 , 称 为 常用 对 数 , 记 作 lg N .但 科学 上 常用 的 对 
数 却 以 一 个 无 理 数 。 二 2. 718 28… 为 底 , 称 为 自然 对 数 , 记 作 ln NN 或 log NN. 
为 什么 以 这 个 稀奇 古怪 的 无 理 数 e 为 底 的 对 数 反而 比 以 10 为 底 的 对 数 更 
自然 ? 

公元 17 世纪 纳 皮 尔 (J. Napier) 发 明 对 数 时 ,其 目的 是 简化 天 文 数据 的 计 
算 , 将 乘法 转化 为 加 法 来 计算 . 它 希 望 将 每 个 正 实数 入 表示 为 某 个 给 定 的 正 
实数 a 的 短 : 入 = 二 a. 如果 入 二 a',M 二 a" , 则 人 JM*N 二 a"!" 有 的 乘法 
变 成 了 严守 的 加 靶 . 问题 是 必须 预先 编制 一 个 表 , 也 就 是 对 数 表 , 列 册 短 ( 即 
真 数 ) 六 与 指数 ( 即 对 数 )?z= 之 间 的 对 应 关系 . 如 果 以 10 为 底 , 则 对 数 表 是 下 


而 的 样子 : 
RR 1 
指数 (对 数 ) 


表 中 的 真 数 跳跃 太 大 . 比如 ,1 过 了 就 是 10, 而 它们 之 间 的 2, 3，…，,9 都 没有 . 
以 后 从 10 跳 到 100, 从 100 跳 到 1 000, 跨 度 就 更 大 了 . 要 克服 这 个 缺点 ,使 表 中 
相 邻 两 个 真 数 比较 接近 ,就 应 当 取 底 a 接近 于 1. 比如 取 4 = 1.001( 纳 皮尔 取 
2 一 0.999 99, 以 便于 计算 三 角 函 数 ). 如 果 你 愿意 ,可 以 自己 编制 一 个 以 a = 
1. 001 为 底 的 对 数 表 , 列 出 以 4 二 1, 2,，…，1 000 为 指数 的 所 有 的 宕 . 如 果 你 
嫌 这 个 表 太 长 了 ,可 以 不 列 出 这 样 多 的 寡 , 而 按 下 面 的 练习 去 做 . 


《1) 编 制 以 4 二 1.001 为 底 的 对 数 表 ,在 表 中 列 出 4 的 1,2,3,*…,9,10， 
20, + , 90, 100, 200, ,900, 1 000, 2 000，…，9 000, 10 000 次 暴 . 

利用 体 编制 这 个 表 可 对 满足 条 件 1 委 太志 ao 的 实数 从 求 出 已 一 
jogsN. 方法 如 下 : 先 查 出 使 Ni 一 as 魏 和 的 最 大 整数 ma 计算 一 
ANa， 查 出 使 N, = ao el 的 最 大 整数 os 计算 A 一 Xf/ Ns 查 出 使 
Ni 二 aim < 扫 轴 的 最 大 整数 13 计算 加 一 AN， 查 出 使 N 一 必 和 安 如 的 最 
大 整数 zo. 则 5 二 no 十 10m 十 100ns 十 1 000ns 是 5 =1logsN 的 不 足 近似 值 ， 
误差 过 1, 还 可 以 稍微 信 计 一 下 上 的 小 数 部 分 5 一 如 .为 此 ,计算 24. 二 
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/No, 则 1 所 1 之 a 二 1,001 .在 很 小 的 区 间 [0,0.001j 肉 近似 地 将 指数 函 
数 y》 二 /(X) 二 1.001’ 看 作 一 次 函数 , 则 由 (0) 二 1, 了 (1) 二 1.001 可 得 
fCr) 1 十 0.001r. 解 方程 4 一 1.001 1 十 0.001z 可 得 近似 解 工 六 
(2 | 一 1)/0.001. 于 是 bb 十 (4 | 一 1)/0.001. 

利用 你 编制 的 对 数 表 , 用 上 述 方法 求 二 1ogs2 和 5 二 logs10 的 近似 值 ， 
由 此 求 出 jg 2 的 近似 值 忆 762 . 


不 难看 出 ,用 接近 于 1 的 a = 1. 9001 为 底 编 制 对 数 家 要 上 比 以 10 为 底 优 
越 . 唯一 的 美中不足 是 求 出 来 的 对 数 的 数值 都 太 大 . 这 个 缺点 很 容易 改正 :只 
要 将 所 有 的 对 数 缩小 同一 个 倍数 就 行 了 . 鉴于 a 二 1 十 1/1 000 ,很 自然 考虑 
将 所 有 的 对 数 除 以 1 000 , 取 0. 001iog oo 代替 logioN .这 样 一 来 ,原先 对 
数 为 1 000 的 数 4a; 一 1.001: ”的 对 数 变 为 1, 而 0. 00liog oo 恰 是 以 as 为 底 
的 对 数 . 相当 于 一 开始 就 取 了 a; 二 1.001!%” 来 作为 对 数 的 底 . 如 果 要 提高 精 
确 度 ,可 以 取 更 接近 1 的 1. 000 1 来 代替 1. 001, 也 就 是 取 a = 1.000 1*%” 来 
作为 对 数 的 底 ,还 可 以 进一步 取 as = 1. 000 0112 0 作为 对 数 的 底 . 一般, 可 以 
考虑 en 二 (1 十 1/r)" 作为 对 数 的 底 , = 越 大 越 好 . 


观察 当 n 越 于 无 穷 大 时 数列 4, 二 局 十 1/n)" 和 有 1, 二 (1 十 1/n)"1!1 的 变 
化 趋势 : 

(1) 求 出 当 二 107 ,天 一 1,2 7 时 an 4。 的 值 .观察 变化 趋势 . 

计算 a, 的 Mathematica 语句 为 


DofPrint[ (1 十 10” (一 m))” (10~ m)],{m.,1,7}] 


计算 A, 的 语句 类 似 . 
(2) 在 同一 坐标 系 中 函 出 下 面 三 个 西数 的 图 象 : 
y= (+1/07), y= (+1/10)"!, y=e 
观察 当 工 增 大 时 图 象 的 走向 ， 
Mathematica 部 图 语 自 为 ; 


Plot{f{(1 + 10° (一 x))” (10° x), 
(1 十 10- (一 x)) (10° x 二 1),E}, {x,1,4)] 


站 
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这 个 语 自 画 的 是 画 数 在 区 间 [1,4] 内 的 图 象 . 再 将 区 间 换 成 [2,4] 或 [3,5] 
或 [5,6] ,观察 所 得 的 图 象 . 


通过 观察 可 以 看 到 , 当 %* 增 大 时 a 二 《十 1/n)* 遂 增 , 4A, == (1 十 1/n)"+! 
递减 . 随 着 ”的 无 穷 增 大 , a,,4, 无 限 接 近 , 趋 于 共同 的 极限 e = 2.718 28… ， 
以 这 个 e 为 底 的 对 数 称 为 自然 对 数 . (当然 ,这 些 结论 都 可 以 通过 理论 推导 加 
以 证 明 , 请 读者 自己 参考 微 积 分 教材 ,这 里 就 不 重复 了 .) 


NsE 


(3) 用 下 面 的 语句 计算 e = 二 1 十 
15 位. 


十 的 近似 值 , 精 确 到 小 数 点 后 面 


mw 
UL 


DofPrint [NE1. 0 十 NSumf 1/(k1), {k,1,.n}],15],{n,s,20}] 
《x* 其 中 语句 N[ 表 达 式 ,15] 表 示 以 15 位 精度 的 实数 输出 表 这 式 ， 语 名 


NSum[ 表 达 式 , {k,l,n)j 表 示 2》) (表达 式 ). ) 


上 面 是 通过 对 数 表 的 编制 来 说 明 自 然 对 数 是 怎样 自然 产生 的 . 虽然 当初 
纳 皮 尔 编制 对 数 表 的 时 候 还 没有 这 样 明确 地 提出 自然 对 数 ,但 他 一 开始 编制 
的 决 不 是 以 10 为 底 的 常用 对 数 表 ,他 汉 0. 999 99 为 底 编 制 的 对 数 表 从 本 质 上 
接近 于 自然 对 数 表 . 只 是 到 后 来 ,为 了 使 用 的 方便 , 才 采 用 换 底 公式 将 已 编 成 
的 对 数 表 改 成 了 以 10 为 底 的 常用 对 数 表 . 

在 科学 中 广泛 应 用 以 为 底 的 自然 对 数 的 更 直接 的 理由 是 : 它 使 涉及 到 
对 数 的 微分 和 积分 公式 变 得 最 为 简单 . 


(1) 运 行 下 面 Mathematica 语 向 ,计算 当 式 = 二 10”,n 二 1,2,3,4,5, 6,7 
时 , A(x) 二 《lg(1 十 Tz))/X 的 值 . 


DofPrint[Log[L10,1.0++ 10.0° (~— 2)j/(10° (~ n))j,{n,1,7}] 

(x 在 Mathematica 中 ,Log [a,.N] 表 示 以 3 为 底 的 N 的 对 数 , 从 而 

Log[10,N] 表 示 常 用 对 数 lg  . 而 Log[N] 表 示 自 然 对 数 , 即 以 e 为 底 的 对 数 ， 

此 时 和 将 e 略 去 不 写 .循环 语句 “De[ 循 环 体 ,{n,1,7}] ”表示 对 n 二 1,2,…,7 依 

次 执行 循环 体 . 本 例 的 循环 体 为 “Print[ 囊 达 式 ]”, 其 作用 是 将 表达 式 的 值 印 
出 来 , 
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观察 当 之 疙 于 0 时 AX) 是 否 趋 近 于 某 一 个 极限 值 4. 


4 就 是 常用 对 数 y= 二 lg 了 在 x = 二 1 处 的 导数 . 它 不 是 一 个 简单 的 数 .定义 
y 二 了 f(z) 二 4 gz , 则 f(r) 在 z= 1 处 的 导数 


2 We oT» a 6 
it 5 


而 Cz) 一 lg zr/lg(10) 一 logz 是 以 a 二 10 为 底 的 对 数 . 


1 


(2) 计 算 a = 10*. 
《3) 计 算 当 一 10 ” 3 天 一 1,2,3;4,5,6,7 时 ，A(zr) sy {ndl 十 x)/z 的 
值 . Mathematica 语 身 为 


Do[LPrint[Log[1.0++ 10.0~ (~ n}]/(10° CC— n))],{n,1,7}] 
观察 当 工 趋 于 0 时 HGz) 是 否 趋 于 某 一 个 极限 值 1? 上 的 值 是 多 少 ? 


上 面 主 要 研究 的 是 与 e 有 关 的 极限 .请 自己 用 类 似 方法 研究 其 它 一 些 
极限 . 


1.3 积分 与 自然 对 数 


对 止 实数 a ,研究 反比 例 区 数 y = f(x) = 1/z 的 图 象 与 zx 轴 及 直线 
xz 一 1, zz 一 a 所 围 的 面积 S(a) , 即 定 积分 | 工 dz . 注意 ,我 们 定义 直线 
工 二 1 为 计算 面积 的 基准 ,从 这 条 直线 向 右 的 面积 为 正 , 向 左 的 面积 为 负 . 也 
就 是 当 x>1 时 SG)>0， 当 0<a 近 1 时 Se)<0, 而 当 a 一 1 时 
(ca) 一 0. 

以 a = 2 的 情形 为 例 .将 自 变 量 区 间 [1,2] 平均 分 为 4 等 份 , 每 份 长 度 为 
1/n , 插 人 的 分 点 二 1 十 k&/n(1 所 上 和 一 1). 所 求 面积 S(2) 相应 地 被 分 
成 x 份 ,其 中 第 六 份 是 直线 zz 二 -1,x 二 zz, 之 闻 所 夹 的 部 分 ,其 面积 记 为 S;. 
Ss 的 上 边界 是 曲线 J 二 1/x 在 区 间 [as vii | 上 的 一 段 . 最 大 高 度 为 1/ x. t= 
n/n 十 上 有 一 1) ,最 小 高 度 为 1/xs 一 mr 十 &) . 故 
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于 是 
_ 1 _ 1 
p> ji> S20)> = = 


业 一 ] 在 一 1 


三 ,0, 分 别称 为 "大 和 ”“ 小 和 ”, 而 面积 的 准确 值 S(2》 在 它们 之 间 . 当 :#= 递增 
时 ， 5, 递减, 0. 递增 , 当 n 一 se 时 二 者 趋 于 共同 的 极限 S(2) . 易 见 3, 一, 一 
1/2n ,用 B40n 来 作 SC2) 的 近似 值 ,误差 小 于 1/2n .而 它们 的 平均 值 
(3, 十 0,)/2 与 S$(2) 的 误差 则 应 当世 小 .事实 上 ,这 个 平均 值 就 是 用 梯形 公式 
求 出 的 SC2) 的 近似 值 . 


(1) 对 2 二 10"《m 二 3,4,5,6 ), 用 NSum 语 身 计算 * 大 和 ”ZZ, 和 “小 和 ”an 
及 它们 的 乎 均值 (3 十 60,)/2 ,观察 它们 的 变化 趋势 .得 出 S(2) 的 近似 值 . 再 
用 求 数 值 积分 的 语 向 


NIntegrate[1/x, {x,1,2}] 


求 SC(2) ,将 所 得 的 铬 果 与 前 面 用 定义 求 出 的 结果 相 比 较 . 
(2) 用 语 向 


S[x_1:= Nintegrate[ 1/t, {t,1,x}] 
定义 函 教 SCzr) 一 上 二 dt .再 用 画图 语句 
Plot[S[x], {x,0. 1,5}] 


画 出 这 个 函数 在 区 闻 [0.1,5] 上 的 图 象 ( 也 可 以 换 成 别 的 区 间 ). 观察 图 象 的 
形状 , 它 好 象 是 什么 函数 ? 

(3) 观 察 出 (2) 中 部 出 的 图 象 可 能 是 对 数 亟 数 的 图 象 .现在 来 求 这 个 对 数 
的 底 上 5 , 它 应 满足 条 件 S(5) 一 1. 从 图 象 上 看 已 比 3 稍 小 一 些 . 以 3 作为 初始 
值 , 用 冻 习 2 所 介绍 的 FindRoot 语句 求 6 所 满足 的 方程 SL(X) 一 1 二 0 的 祖 的 
较 精 确 的 值 . 也 可 以 用 练习 2 介绍 的 牛顿 切线 法 ,利用 递 推 关 系 式 

一 Ga) 一 1 
[7 Sa 


由 笋 的 近似 a 求 出 更 好 的 近似 值 4a1 .这 里 S'la) 一 1/a .人选 代 语 多 为 


1.4 油 和 数列 9 


YLa_]: 一 a 一 (SLa] 一 1)a 
NestList[g,3,4] 


计算 结果 发 现 6 恰 是 自然 对 数 的 底 e .在 同一 些 标 系 中 作出 函数 SC(r) 和 
ln zx 的 图 象 ,发 现 二 者 完全 重合 ， 


当然 ,由 不 定 积分 很 容易 知道 S(xz) 一 | 二 dt 二 ln x. 以 上 是 通过 数值 和 
图 象 实验 来 验证 这 一 结论 . 

Mathematica 求 不 定 积分 [far , 定 积分 | Feedz 以 及 用 数值 方法 求 
定 积分 | f(xYdx 的 语句 分 别 是 


Integrate[{ ,x | 
Integratelf, (x,a,b}] 
Nintegrate[f, {x,a,b}] 


1.4 调和 数列 


自然 数 的 倒数 组 成 的 数列 1, 守 ,于 ,二 称 为 调和 数列 . 我 们 把 它 的 


前 ”项 和 > 去 记 作 吾 CD . 
=】1 


(1) 将 坐标 为 (1; 吾 (2)) (nn 二 1,2,…,100 ) 的 点 依次 连接 成 光滑 曲线 . 
与 自然 对 数 的 章 线 y 二 lIn x 《x [1,100] ) 画 在 同一 个 坐标 系 中 . 完成 此 事 
的 Mathematica 语句 如 下 : 


H[n_]:= 一 NSumLtk,{k,1,np)] (x 定义 函数 HOn).) 

一 TableL{n,H[n]},{n,1;100}] 〈* 定义 点 集 t.) 

pici 一 ListPlot[t,PlotJoined 一 >>True] (x 将 6 中 的 点 顺 次 连接 成 
光滑 曲线 并 储存 在 pic1 中 (以 恒 重 画 ), 其 中 的 选项 “PlotJoined 一 > True” 表 示 
顺 次 连 成 光滑 曲线 , 如 果 去 掉 此 选项 , 则 只 将 上 中 的 点 画 出 . ) 

pic2= Plot[Log[Lx],{x,1,100},PlotStyle —> (RGB[L0,0,1])] (x* 


Oo -一 -一 一 ”~ -一 
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阵 通 数 y 一 Inxzrczr 拒 [1,100]) 的 图 家 并 储存 在 pic2 中 .选项 “PlotStyle 一 > 

{RGBfL0,0,1]}” 是 将 此 曲线 画 成 赣 色 ,函数 RGB[Lr,g,b] 中 的 三 个 自 变 醒 上 ， 

gb 取 值 在 0 到 1 之 间 ，, 分 别 表 示 红 , 绿 、. 蓝 三 种 颜色 的 强度 , ) 
Show[picl,pic2] (x 将 picl,pic2 表示 的 西 个 图 形 同 时 画 出 . ) 


观察 可 知 当 于 很 大 时 同一 站 的 百人 aa) 与 Inn 之 差 接近 于 常数 .计算 出 c 二 
五 (100) 一 ln 100 ,用 红色 画册 通 数 y 一 lnxr 十 c 的 图 象 , 并 与 picl,pic2 的 图 
象 咏 在 同一 个 坐标 系 中 ,语句 如 下 : 


c 一 也 [100] 一 Log[100] 
pic3 一 Plot[LogLx] + c, {x,1,100},PlotStyle -> {RGBL1,0,0]}] 
Show[ pic1 ,pic2, pic3] 


观察 picl 的 黑色 曲线 与 pic3 的 红色 曲线 几乎 重合 的 现 罕 ， 

《2) 为 了 研究 当 普 无 穷 增 大 时 Cn) 一 五 (nz) 一 lnn 是 否 趋 备 一 个 常数 ， 
将 学 标 为 (2) 吾 (n) 一 lnn) (1 所 nn 所 100 ) 的 点 依次 连接 成 光滑 曲线 cl, 再 将 
坐标 为 (nH(n) 一 nx 十 1)) (1 太守 100 ) 的 点 依次 连接 成 光滑 曲线 c2. 
在 同一 坐标 系 中 了 画 出 曲线 clc2. 观 察 cl 递减 和 c2 递增 以 及 二 者 相互 接近 的 
现象 

计算 nn 二 10” 《m= 二 12.116 ) 时 Cn) = 二 Hn) 一 lInn 和 cl(n) 一 
吾 (2) 一 n(n 十 1) 的 值 , 现 察 CCln) 递减 、cCna)y 递增 ,二 者 趋 于 同一 极限 的 现 
象 . 并 求 出 这 个 极限 忆 . 


极限 
C=lim[1 十 吉 十 言 十 “十 吉 一 ln 
称 为 欧 拉 (Euler) 常 数 . 
显然 


ctn) 一 再 (za) — nx+ 1)<Cn) = Ha)— lnn 
cln) 就 是 下 页 上 图 中 前 个 阴影 “三 角形 "之 和 ,当然 随 着 的 增加 而 
递增 
而 C(x) 就 是 单位 正方 形 而 积 1 减 去 下 页 下 图 中 前 = 个 阴影 “三 角形 * 面 
积 所 得 的 差 , 当 然 随 着 的 增加 而 递减 
而 由 于 当 n 一 oo 时 Cn) 一 eln) 一 In|1 十 二 | 趋 于 0, 帮 Cln) ,clm) 站 


于 同一 个 极限 . 
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1.5 双 曲 函数 


设 Pla,5) 是 单位 圆 十 yy 二 1 上 一 点 ,tt 二 人 XOP , 则 定义 
a=cost, b=sint 
分 别称 为 上 的 正弦 和 余弦 . 
自 变量 上 也 可 用 另 一 方法 定义 : 设 ~XOP 被 图 截 得 的 定形 (图 中 阴影 部 
分 ) 面 积 为 S , 且 规 定 S 的 正 负 号 与 XOP 相同 . 则 S$S = t/2 ,从 而 t == 24、 


图 1 一 2 
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现在 将 圆 换 成 双 曲线 zx? 一 y 二 1. (a,8) 是 双 有 曲线 右边 一 支 上 任 一 点 ， 
a 之 1. 设 人 XOP 被 双 曲 线 截 得 的 曲 边 三 角形 (图 中 阴影 部 分 ) AOP 面积 为 
S. 上 且 规定 $ 的 正 负 号 与 LXOP 相同 . 记 + = 2S .定义 

a=chit, b=sht 

分 别称 为 :的 双 曲 正弦 和 双 曲 余弦 . 

求 S 的 方法 : 记 双 曲线 的 右边 一 支 与 x 轴 的 交点 为 4(1,0) ,过 已 点 与 
+ 轴 平行 的 直线 与 y 轴 的 交点 为 D(0,6) . 不妨 将 y 看 作 自 变量 , x 一 
V3 十 了 看 作 因 变 量 , 则 双 曲 线 弧 4P 与 直线 段 PD,O4,OD 所 围 的 曲 边 梯 
形 4ODP 的 面积 Sooe = | Vy 下 了 dy. 所 以 


S = Saopp 二 SaAopp 
bh 
=| vy TF1idy — $6 VE TI 
pb 
Fol vy 二 idy—b v1 
t 


前 出 双 则 肖 数 y= 二 chi 和 yy 二 shi 的 图 人 象 .Mathematica 语 自 如 下 : 


Sfy_]: 一 2*NIntegrate[Sqrt[u 2 二 1],{u,0,y}] 
一 y*Sqrt[y ”2 十 1] 
sh = ParametricPlot[ {t[y],y},{y, — $,5}] 
ch = ParametricPlotF {t[y],Sqrt[y” 2 十 1]},{y, — 5,5}] 


观察 发 现 双 曲 余弦 的 图 象 有 些 象 抛物 线 . 它 通 过 点 (0,1) 并 且 以 y 轴 为 
对 称 轴 , 如 果 它 是 抠 物 线 , 应 具有 形状 ?=az 刀 十 1 .任职 一 个 zx 值 , 可 次 定 


y 一 ch 上 一 点 的 坐标 GO，vi 下 1 到 到 直 二 1 , 则 搜 物 线 


2 一 az 十 1 与 ?一 chz 的 图 象 有 三 个 公共 点 : (0;1),( 土 tw), we 十 1). 如 
果 > =ch 上 是 抛物 线 , 则 它 与 抛物 线 y 一 ar? 十 1 应 重合 . 


取 z 二 1,5 ,计算 出 a ,在 同一 华 标 系 中 坟 出 抠 物 线 y》 二 a7? 十 1 与 》 二 
ch t 的 图 象 .( 不 妨 将 抛物 线 通 成 红包 ,以 便 辩 认 .) 可 以 观察 到 ,虽然 了 两 条 沿线 
有 三 个 公共 点 ,但 二 者 并 不 重合 . 随 着 | 工 | 的 增 大 , y 二 chi 的 图 人 象 比 抛物 线 
更 快 地 向 》 轴 靠拢 . 


1.5 双 曲 函数 13 


取 z 一 0.1,0.01,0.001,… 计算 出 相应 的 a 值 ,观察 当 w 一 0 时 a 的 极限 
值 ay .在 同一 坐标 系 中 作出 y 一 aoz2 十 1 与 yy 一 chz 的 图 象 , 观 察 发 现 二 者 在 
点 (0,1) 的 附近 吻合 得 很 好 . 当 抛 物 线 y 一 4x? 十 1 与 y 二 cht 的 公共 点 
( 士 txz)，waz 十 1) 的 位 置 趋 于 (0,1) 时 ,该 抛物 线 的 极限 位 置 就 是 yy 二 
aoz2 十 1 .1 十 dor? 也 就 是 y= 二 ch i 的 泰勒 展开 式 的 前 三 项 (一 次 项 等 于 0). 


3 二 ch zt 的 图 象 称 为 县 链 线 . 它 就 是 将 一 条 绝对 和 柔软 .无 伸缩 性 、 密 度 均 
名 的 细 线 两 端 回 定 后 自然 下 垂 所 成 的 形状 . 

前 面 求 与 点 了 (a,5) 对 应 的 S 一 Sr 及 t 二 2S 还 有 另外 一 种 方法 :将 坐 
标 轴 向 顺 时 针 方 向 旋转 45° ,得 到 新 的 坐标 系 Ox'y' .由 坐标 变换 公式 ,同一 
点 的 旧 坐 标 (x,y) 与 新 坐标 (x!',y') 之 间 有 下 面 的 关系 式 : 
= a y= 二 

V2 V2 
从 而 双 曲 线 方 程 x? 一 y* = 1 变 为 27y 二 1. Pla,6b) 的 新 坐标 (a' ,5) 为 


区 


，_@ 一己 ，_ 鼠 十 已 一 | 1 
一 .0 一夫， ，4 的 新 坐标 为 | - 扩 " 二 | -分别 过 P,4 作 Ow 二 
的 垂 线 交 Oz 轴 于 B,C. 则 O08 二 a,0C = 于 -由 于 ,4 都 在 双 曲 线 上 ， 


1 i 1 S 
故 “2 一 [| ,BB OB .: BP = OC.CA, Sgr — Saco4 = 


OB:BP OC:CA 
2 2 


= 0. 于 是 


1 
S 一 acap 二 S App Sacon | 4 dx’ 


= 让 |i 人 二 = Sin(a td) 
t=lnla 十 四 一 InCvw 更 十 工 十 攻 》 

注意 , 上 面 用 到 了 双 曲 线 上 任 一 点 Pla,b) 的 坐标 所 满足 的 关系 式 
a 一 1,1/(4 一 0) 一 4 十 6. 由 i 二 in(a 十 人 及 一 t 二 ln[(a 二 8) 一 ] 一 
in(a 一 上 5) 可 得 ef 二 4 十 5,e := 二 a 一 了 ,从 而 
a=cht= 6 一 sh 一 全 二 和 
这 就 是 课本 上 对 双 曲 孙 数 的 定义 . 以 上 介绍 的 从 与 双 曲 线 有 关 的 面积 来 定义 
ch zt,sh z ,说 明了 为 什么 要 将 这 两 个 孙 数 称 为 双 晶 尔 数 ,以 及 它们 与 三 角 涌 数 


的 类 似 之 处 . 
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实验 二 ”怎样 计算 r 


众所周知 ,圆周 率 x 是 平面 上 区 的 周 长 与 直径 之 比 , 它 等 于 
3. 141 592 6…. 古代 人 把 3 和 作为 它 的 近似 值 . 古 希 腊 阿 基 米 德 (Archimedes) 


曾 得 到 3 二 < 之" < 3 十 . 我 国 宋代 的 祖冲之 得 到 的 近似 值 号 〈( 约 率 ? 和 


1 《 密 率 ) ,后 者 化 为 小 数 后 等 于 3. 141 592…, 与 的 准确 值 的 误差 在 10-。 
以 下 . 

但 是 ,你 是 否 知道 怎样 计算 x 的 近似 值 ?是 否 尝试 过 利用 所 知道 的 数学 知 
识 来 计算 x 的 近似 值 ,自己 当 一 回 阿 基 米 德 或 祖冲之 ?我 们 建议 了 下 面 几 种 方 
法 . 这 些 方法 很 简单 ,一 学 就 会 ,你 不 妨 在 计算 机 上 试 一 试 ,体验 一 下 自己 得 到 
值 时 的 喜悦. 相信 你 学 会 这 些 方法 之 后 不 会 满足 于 只 用 来 计算 x ,而 会 利用 
它们 来 做 别 的 事情 . 你 也 可 以 自己 想 出 一 些 别 的 方法 来 计算 = . 当然 ,现在 有 
更 快 更 好 的 方法 计算 x ,可 以 计算 出 x 的 十 万 位 以 上 的 近似 值 .但 这 些 方法 就 
不 那么 简单 了 ,不 可 能 在 这 里 介绍 . 你 如 果 有 兴趣 ,可 以 尝试 从 别 的 资料 去 
了 解 . 


2.1 数值 积分 法 


定 积分 


| Td ee 

计算 出 这 个 积分 的 数值 ,也 就 得 到 了 的 值 

一 般 的 ,要 计算 定 积分 5 一 f(z)dz ,也 就 是 计算 曲线 y 一 f(x) 与 直线 
y 一 0,x = avz 二 6 所 转 成 的 曲 边 梯形 全 的 面积 .为 此 ,用 一 组 平行 于 y 轴 的 
直线 地 = mi (li 和 nl1,4= TI 二 5b) 将 
曲 边 梯形 分 成 个 小 曲 边 梯形 ,总 面积 5 分 成 这 些小 曲 边 梯形 的 面积 之 
和 . 如 果 取 很 大 ,使 每 个 小 曲 边 梯形 的 宽度 都 很 小 ,可 以 将 它 上 方 的 边界 
f(z) (x 所 1< x ) 近 似 地 看 作 直线 段 , 将 每 个 小 曲 边 梯形 近似 地 当 作 梯形 
来 求 面积 ,就 得 到 梯形 公式 . 如 果 更 准确 些 , 将 每 个 小 曲 边 梯形 的 上 边界 近似 
地 看 作 抛物 线段 ,就 得 到 辛普森 公式 . 具体 公式 如 下 ， 


2.1 数值 积分 法 15 


梯形 公式 . 设 分 点 zz- 将 积分 区 间 [e ,如 ] nn 等 分 , 即 x; 二 a 十 
i(5 一 a)/n 0 扫 1 扫 2 所 有 的 曲 边 梯形 的 宽度 都 是 天 三 (8 一 a)/n. 记 vy 二 


f(z,), 则 第 i 个 曲 边 梯形 的 面积 S, 近似 地 等 于 梯形 面积 ty 1 十 五. 将 


所 有 这 些 梯 形 面 积 加 起 来 就 得 到 
p—a 


了 2 


SA 


[> 二 3 二 2 


这 就 是 梯形 公式 . 

辛普森 (Simpson) 公 式 . 仍 用 分 点 =a 十 iCB 一 a)/n(1l 寺 i 守 n 一 1) 
将 区 间 [a,5] 分 成 4 等 份 ,直线 = 二 x (1 志 i 志 一 1) 将 曲 边 梯形 分 成 个 
小 曲 边 梯形 . 再 作 每 个 小 区 间 [xiiowj] 的 中 点 式 .1 二 a 十 


| 可 S| Sa 将 第 i 个 小 曲 边 宰 形 的 上 边界 y= f(z) (x :< 委 工 所 
Zz) 近似 地 看 作 经 过 三 点 {x,， f(x)) (x 二 Ti ) 的 抛物 线段 , 则 可 
求 得 

一 人 


Sm yy 


n 
其 中 -一 f(x,_}) .于 是 得 到 
S ~ [Cy 二 9) 十 29y1 十 十 十 -1) 
十 4 十 地 十 … 十 3 了 二) 
这 就 是 辛普森 (Simpson) 公 式 . 


练习 1 


(1) 连 取 不 同 的 ,用 梯形 公式 和 痒 普 厅 公 式 计算 一 | 本 站 idx 的 近 
似 值 . 

(2) 误 差 的 实际 观察 :选取 于 一 1 000,10 000,100 000,.… 等 ,观察 n 值 的 
增加 所 导致 的 5 值 的 变化 情况 ,直到 的 增加 所 导致 的 S 的 变化 小 于 给 定 的 
误差 界 . 比较 同一 个 n 值 下 实 形 公式 和 辛普森 公式 计算 结果 的 差别 ,对 两 个 方 
法 的 精度 差别 获得 一 个 感性 认识 . 

(3) 误 差 的 理论 分 析 : 和 参考 教科 书 或 参考 资料 ,从 理论 上 分 析 计 算 误 差 与 
?的 关系 ,与 实际 观察 结果 相 比较 . 

(4) 半 径 为 1 的 轩 的 面积 等 于 工 . 用 数值 积分 法 计算 这 个 面积 . 

(5) 自 己 设计 类 似 的 方法 计算 lg 2 的 近似 值 . 


一 一 一 一 一 一 
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2.2 ”泰勒 (Taylor) 级 数 法 


利用 反正 切 函 数 的 泰勒 级 数 


3 5 2 一 | 
zr 


2 =] 


i 


计算 下 
将 了 = 一 1 代入 上 面 的 级 数 可 以 得 到 


T ee AL 
arctan l=1 了 十 


这 似乎 可 以 用 来 计算 = . 但 是 ,这 个 无 穷 序 列 收敛 太 慢 , 不 实用 . 要 使 泰勒 级 数 
收敛 快 , 1z| 应 当 比 1 小 ,最 好 是 远 比 1 小. 比如 , arctan 去 就 收 全 得 较 快 . 但 


出 它 的 值 对 计算 x 有 何 帮 助 呢 ? 也 就 是 说 : a 一 arctan 5 与 有 什么 关系 


十 a 


呢 ? 我 们 有 tan a = 二 .由 正切 的 倍 角 公式 可 得 tan za 一石,tan 4a 一 45. 
tan deasl "4a 了 .可 以 用 4« 作 地 的 近似 值 .但 这 还 不 够 准确 .我们 把 
120 


误差 8 一 44 一 下 求 出 来 对 4a 进行 修正 .由 tan 4a 一 75 及 tan 工 可 求 得 


1 


tan 8 一 tan| 4a 一 | 一 39 


1 
239 


B= arctan 


nT a 时 oe. 
二 一 da — 8 = darctan arctan 5 


于 是 得 到 
a 
5 239 
这 称 为 Maqin 公式 .利用 arctan xz 的 泰勒 展开 式 求 出 arctan 于 varetan 33 的 


近似 值 ,就 可 以 由 Magin 公式 求 出 x 的 近似 值 了 . 
泰勒 级 数 是 无 穷 级 数 ,实际 计算 时 必然 只 能 取 它 的 前 > 项 ,导致 截断 误差 


1 
和 一 16atrctan 一 一 4arctan 


3 2r 一 1 
E, = | arctan 并 一 z 一 本 十 … 十 (一 D 工 ]| 


2 一 


由 于 是 交错 级 数 , 当 |z1<1 时 ,可 以 简单 地 用 己 , 一 了 二 了 了 来 估计 截断 误差 
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练习 2 
(1) 利 用 Magin 公式 ,计算 不 的 近似 值 到 给 定 的 精度 . 与 的 准确 值 比较 . 
并 与 数值 积分 法 得 到 的 结果 比较 . 
如 果 要 计算 并 的 前 15 位 数字 ,计算 arctan(1/5) 和 arctan(1/239) 应 当 取 
到 种 级 数 展 开 式 的 多 少 项 ? 取 几 二 或 几 万 项 是 否 就 能 得 到 高 精度 的 工 值 ? 
(2) 自 己 设计 类 似 的 方法 计算 lg 2 . 


2.3 蒙特 卡 罗 (Monte Carlo) 法 


单位 圆 的 面积 等 于 r .可 以 用 数值 积分 公式 来 计算 这 个 面积 的 近似 值 . 另 
一 个 方法 是 用 蒙特 卡 罗 法 , 即 用 随机 投 点 的 方法 来 求 这 个 面积 r 的 近似 值 . 具 
体 方法 如 下 : 

在 平面 直角 坐标 系 中 ,以 O(0,0),A(1,0),C(1,1),B(0,1) 为 四 个 顶点 
作 一 个 正方 形 , 其 面积 S$ == 1 .以 原点 〇 为 圆心 的 单位 圆 在 这 个 正方 形 内 的 部 
分 是 圆心 角 为 直角 的 扇形 ,面积 为 Si = 二 r/4. 在 这 个 正方 形 内 随机 地 投 人 
%# 个 点 , 设 其 中 有 x 个 点 落 在 单位 遍 形 内 . 则 


随机 投 点 可 以 这 样 来 实现 :任意 产生 区 间 [L0,1] 内 的 一 组 随机 数 zx,y，, 则 
(zx,y) 就 代表 一 个 随机 点 三 的 坐标 . 这 个 点 落 在 单位 扇形 内 的 充分 必要 条 件 
是 x 十 六 守 1. 


(1) 取 不 同 的 做 土 面 的 实验 .将 所 得 的 7 的 近似 值 记录 下 来 ,与 已 知 的 
的 值 比 较 . 

(2) 观 察 nr 的 大 小 对 所 得 结果 的 精度 的 影响 .可 以 看 到 ; n 太 小 ,精度 太 
差 , 但 如 果 闫 太 大 ,从 计算 机 上 所 得 的 不 是 真正 的 随机 数 ,效果 仍 不 理想 . 总 的 
说 来 ,这 个 方法 的 精度 是 差 的 . 


另 一 种 用 蒙特 卡 罗 法 来 计算 7 的 方法 是 1777 本 本 人 二 
(Buffon) 提 出 的 随机 掷 针 实验 , 其 步 又 如 下 : 

(1) 取 一 张 白 纸 ,在 上 面 画 许多 间距 为 4 的 等 距 平行 线 . 

《2) 取 一 根 长 度 为 (i < 之 4 ) 的 均匀 直 针 ,随机 地 向 画 有 平行 线 的 纸 上 拂 
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去 ,一共 投掷 呈 次 ( 关 是 一 个 很 大 的 整数 ). 观察 针 和 直线 相交 的 次 数 避 . 
(3) 由 分 析 知 道 针 各 直线 相交 的 概率 p 二 24/rd . 取 w/n 为 2 的 近似 
值 , 则 
~ 2 
md 


特别 取 针 的 长 度 : 一 d/2 时 ,7 ~ n/m. 


真正 去 做 大 量 掷 针 的 实验 是 很 费时 间 的 .请 尝试 设计 一 个 方案 ,用 计算 机 
模拟 布 丰 掷 针 实 验 , 得 出 工 的 近似 值 . 


随机 整数 互 素 的 概率 ，; 

取 一 个 大 的 整数 N .在 1 到 信之 间 随 机 地 了 芭 一 对 整数 a,6 , 找 出 它们 的 
最 大 公 欧 数 (a,5) , 当 (4,6) 一 1 时 称 4,4 互 素 . 做 刀 次 这 样 的 实验 ,记录 其 中 
(4565) 一 1 的 情况 出 现 的 次 数 m .算出 p= 二 mr/n 的 值 、 

理论 分 析 指 出 :随机 整数 互 素 的 概率 


= 1 一 8 .| 
P= 1 ne 因而 正字 人 丙 


T 


在 三 维 空 间 中 ,由 三 个 圆柱 面 x 十 一 1,x? 十 x? 二 1,y 十 2z* 二 1 国威 
一 个 立体 .利用 蒙特 卡 罗 法 求 它 的 体积 . 
附录 Mathematica 程序 
1. 数值 积分 法 计算 * 
a=0b = 1;y[x_]:= 4/(1+ x 2); 


mn 一 1000; 
pisl = N[(b — a)/nx (Sumky[a 十 ix (bp 一 am],tilin 一 1 
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十 (y[a] 十 y[Lb])/2),50] 
pis2 = N[(b ~ a)/6/ 
nx (Cy[al + y[bB]) + 2x Sum[y[a + ix Ob — a)/n], 


{i,ln— 1}] 
+ 4xSum[y[a + GO— 1/2)* (hb — a)/nj, 
{i,1,n} ]) ,$0] 
2. Maqin 公式 计算 x 
n 一 100; 
pimaqin = NL 
16 * Sum[( 一 1》”(k 一 1) * (175) - (2k—1)/(C(2k—1), 
{k,1,n}] 
— 4x*xSum[C—1)~ (k—1) x (1/239)* (2k—1)/(2k—1), 
{k,l1,n}],s0] 


3. 蒙特 卡 罗 法 计算 r 


n 一 10000; 
pimontecarlo1 一 
Bilock[ {i,m = 0},For[i = n,i> 0,i——, 
m= m+ HRandom[]” 2 十 Random[] 2 <= 1,1,0]]; 
NL4* m/n,10]] 


实验 三 ”最 佳 分 数 近 似 值 


人 人 和 们 常 称赞 祖冲之 求 出 了 x 的 近似 值 3. 141 592 ,精确 度 达 到 小 数 点 后 
面 6 位 ,误差 在 0.000 001 以 下 .但 事实 是 :祖冲之 求 出 的 并 不 是 小 数 近似 值 ， 
而 是 分 数 近 似 值 3557113 . 小数 近 似 值 3. 141 592 是 将 祖冲之 的 分 数 近 似 值 
355/113 展开 而 得 到 的 ,以 便 说 时 祖冲之 的 圆周 率 的 精度 是 多 人 么 的 高 ,误差 是 
多 么 的 小 . 然而 ,我 们 将 看 到 ,在 某 种 意义 上 ,展开 后 得 到 的 这 个 小 数 近 拟 值 
3. 141 592 远 不 如 祖冲之 原来 的 分 数 近似 值 3557113 好 . 

7 是 无 理 数 . 对 于 任何 一 个 无 理 数 ,不 可 能 用 分 数 p/g 来 作 它 的 淮 确 
值 , 只 能 作 它 的 近似 值 . 近 似 值 p/g 的 好 坏 可 以 用 绝对 误差 4 一 |a 一 p/g| 来 
衡量 . 4 越 小 ,就 说 明 这 个 近似 值 p /9 的 精确 度 越 高 . 对 于 给 定 的 分 好 9 ,总 可 
选择 适当 的 分 子 使 p/g 最 接近 a ,也 就 是 使 误差 4 最 小 . 此 时 一 定 有 4 到 
1/29 .由 此 可 见 , 要 提高 精确 度 ,减少 误差 ,一 个 简单 的 办 法 就 是 增 大 分 母 9 . 
只 要 9 足够 大 ,就 可 以 使 误差 任意 小 .但 能 不 能 用 较 小 的 分 母 实现 较 高 的 精确 
度 呢 ?好 比 买 东西 ,一 般 来 说 , 花 越 多 的 钱 就 能 头 到 越 好 的 东西 . 但 我 们 也 希望 
价 廉 物美 , 花 较 少 的 钱 也 能 买 到 好 东西 . 看 看 祖冲之 的 圆周 率 3557113 . 它 的 
分 母 只 有 113, 这 样 大 的 分 母 可 以 保证 误差 在 1/226 有 ~ 0.004 4 以 下 ,但 它 作 
为 7 的 近似 值 的 误差 jr 一 355/1131| 却 在 0.000 000 3 以 下 ,大 大 超额 完成 任 
务 ! 而 它 展开 得 到 的 小 数 近 似 值 3. 141 592 (不 足 近 似 值 ) 或 3. 141 593 (过 剩 
近似 值 ) ,误差 与 355/113 基本 相同 ,但 写成 分 数 形式 3 141 592/1 000 000 或 
3 141 593/1 000 000 后 的 分 母 1 000 000 却 大 得 多 ,是 113 的 8 850 倍 . 这 好 比 
花 了 8 850 倍 的 价钱 去 买 同样 质 量 的 东西 ,未免 太 不 划算 了 吧 ? 

祖冲之 算出 的 圆周 率 有 两 个 ,一 个 是 22/7 , 称 为 “ 约 率 ”; 另 一 个 是 
355/113 , 称 为 “ 密 率 ”. 不 但 密 率 是 分 母 小 而 且 误 差 小 的 优秀 近似 值 , 约 率 以 
很 小 的 分 母 ? 实现 了 误差 二 0. 001 3 的 精度 , 仍 不 失 为 好 的 近似 值 . 

本 实验 是 要 研究 怎样 用 分 数 近似 值 去 对 给 定 的 无 理 数 作 最 佳 逼 近 .“ 最 
` 佳 ”就 是 既 要 分 苹 小 ,又 要 精确 度 高 . 我 们 首先 对 “最 住 ” 给 出 一 个 具体 而 明确 
的 标准 . 然后 给 出 一 个 求 最 佳 近似 值 的 方法 . 
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3.1 分 数 对 无 理 数 的 最 佳 逼 近 


最 佳 逼近 . 设 是 无 理 数 , P/Q 是 分 数 . 如 果 P/Q 作为 “的 近似 值 的 误差 
比 起 分 母 不 超过 久 的 所 有 其 余 的 分 数 都 小 ,也 就 是 |a 一 P/Q| < |a 一 p/al 
对 所 有 1 和 dg 迄 氏 成 立 , 就 称 忆 / 驴 给 出 了 wx 的 最 佳 多 近 . 

我 们 也 可 以 对 分 母 小 ,精度 高 提出 另外 的 标准 . 比如 说 ,计算 绝对 误差 
科 二 la 一 p/91 与 分 母 4g 的 乘积 e 一 94= ica 一 | ,e 值 越 小 越 优 . 或 者 ,再 
进一步 强化 “分 母 小 ”这 一 要 求 , 用 玉 ==g*4 二 glge 一 | 作 衡 量 标准 ,EE 值 越 
小 越 优 . 


已 知 r 一 3.141 592 653 579.… . 

(1) 让 分 母 g 依次 取 记 1 到 100 000 的 自然 数 . 对 每 个 分 母 q， 取 记 二 
[er 十 0.5] 作为 分 子 得 到 一 个 最 接近 的 分 数 p/q. 【这 里 ,符号 [or 十 0.5] 
表示 不 超过 gn 十 0.5 的 最 大 整地 , 它 也 就 是 由 gr 四 会 五 入 得 到 的 整数 . ) 从 
这 10 万 个 分 数 中 选 出 那些 对 工作 了 最 佳 和 逼近 的 分 孝 ， 

(2) 从 式 的 10 万 个 分 教 近 似 值 zj/e (1 委 9 委 100000, 训 一 [er 十 0.5]) 
中 , 选 出 使 五 一 9 一 clsa 一 如 | 值 挟 1 的 那些 分 数 . 并 按照 五 值 越 小 越 好 的 
标准 选 出 “十 佳 ?: 最 小 的 10 个 王 值 所 对 应 的 态 /9 . 

注意 观察 :祖冲之 的 圆周 率 2277 (级 率 ) 和 355/113《 密 率 ) 是 否 在 你 的 选 
优 活动 中 脱颖而出 ? 


3.2 乐音 的 频率 比 


声音 是 由 振动 物体 发 出 的 . 振动 频率 越 高 ,音调 越 高 . 比如 ,音乐 中 

1(do), 2Cre), 3Cmiy, 4(fa), 5(Cs0ol), 6(a), 7(si), 1 (do) 
这 8 个 音 (用 简谱 表示 ) 一 个 比 一 个 高 ,就 是 说 它们 的 频率 一 个 比 一 个 高 . 

问题 已 经 知道 高 八 度 的 1 的 频率 是 1 的 2 倍 . 那么 ,2,3,4,5,6,7 的 频 
率 分 别 是 1 的 多 少 倍 呢 ? 

从 1 到 1 要 经 过 12 个 半 度 音 .假设 所 有 的 音 的 地 位 平等 ,每 升 高 半 度 , 频 


- - -一 -一 -一 一 err 
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率 乘 以 同一 个 倍数 寺 . 从 1 到 1 经 过 12 个 半 度 ,频率 变 成 2 倍 .可 见 铝 = 2， 

有 一 2 人 2 .上述 8 个 音 中 ,从 3 到 4 升 高 半 度 ,从 ? 到 1 升 高 半 度 ,其 余 相 邻 的 

音 都 相差 两 个 半 度 . 故 各 音 的 频率 (以 音 1 的 频率 为 1 个 单位 ) 应 依次 为 : 
1 216 ， 2173 ， 2 2712, pee 2nAz, 2 

这 样 一 来 ,各 音 的 频率 比 都 是 无 理 数 . 但 另 一 方面 ,为 了 使 音乐 和 谐 ,各 音 之 同 

的 频率 比 应 当 是 简单 的 分 数 ,分 母 越 小 越 和 谐 . 怎样 解决 这 个 矛盾 ? 用 分 数 对 

它们 作 最 佳明 近 ! 


按照 练习 1 所 说 方法 ,用 适当 的 分 数 对 上 述 各 音 的 频率 作 最 住 允 近 , 重 新 
确定 各 音 的 频率 比 (以 音 1 的 频率 为 1 个 单位 ) 使 它们 都 是 分 母 在 8 以 内 的 分 
数 . 

用 计算 机 按 前 面 所 说 的 频 沼 (2 的 各 次 固 或 者 它们 的 分 数 近 似 值 ) 产 
生 乐 音 并 在 喇叭 中 播送 出 来 ,或 者 再 进一步 将 它们 编 成 乐 易 , 听 一 听 它 是 否 是 
你 预料 的 效果 ? 


3.3 ”实数 的 连 分 数 展开 


问题 ”给 定 一 个 正 实数 a ,怎样 求 出 它 的 最 佳 的 分 数 近 似 值 ? 

像 上 面 所 说 的 那样 去 大 海 捞 针 , 对 每 一 个 分 母 依 次 审查 ,“ 万 里 挑 一 ” 选 出 
最 佳 逼 近 a 的 分 数 近 似 值 ,显然 是 一 个 太 笨 的 办 法 . 在 让 你 尝试 过 笨 办 法 之 
后 ,下 面 再 介绍 一 种 巧 办 法 ,可 以 直接 找到 最 佳 的 分 数 近似 值 . 

边 照 通用 的 符号 ;用 [ax] 表示 a 的 整数 部 分 , 即 不 超过 a 的 最 大 整数 . 
an 二 [4] 可 以 作为 a 的 最 初 的 分 数 近 似 信 ,其 误差 5 一 &K 一 ao 满足 条 件 0 所 
&1 之 1. 如 果 s 二 0 , 则 ao 就 是 a 的 鹤 确 值 .否则 0 过 5 之 1 ,了 到 Al= 1/e 记 
1, 则 & = 1/Al， 

«一 a 十 6 一 oo 十 赤 

间 题 转化 成 寻找 4, 的 分 数 近 似 值 . 将 刚才 对 a 做 的 事情 对 4, 重复 一 所 : 

取 w = 二 [41j ,0 志气 二 41 一 al 世 1. 取 a 作为 4 的 近似 值 , 则 
at 一 Go 十 i 


是 a 的 分 数 近 似 值 . 如 果 &, 二 0 , 则 «二 a .否则 再 取 4, 一 1/ss 之 1， 
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4 二 十 元 

这 一 过 程 可 以 按 下 面 的 递 推 法 则 进行 下 去 : 

令 4 一 a， 

对 每 个 整数 上 之 0 ,如 果 已 经 求 出 非 负 整数 ws 5C0 扫 & 魏 半 一 上 ) 及 非 负 实 
数 4.(0 寺 让 忒 nn) 使 ai 一 [4.] < 4， ,0< sl 一 4 一 和 所 1 和 4 一 
l/s 对 0 帮 上 之 4 一 1 成 立 . 则 到 

%, 二 [4J, OR6r = A.—a<l 

如 果 s+ = 0 , 则 递 推 过 程 终 目 ， 

否则 se- >0 , 取 


则 


1 
A 一 
二 ca 十 人 


设 上 述 递 推 过 程 全 少 吕 进行 z 步 ,得 到 非 负 整数 列 ae (0 扫 & 扫 2 一 1 ) 及 
非 负 实数 列 A (0 二 有 nn). 对 每 个 0 世上 入 一 1 ,将 大 一 1 个 等 式 A, 一 


4 十 姑 -(1 忆 1 有一 1) 依 次 代 人 a 一 a 十 十 ,得 
yr ! 
1 


2 一 5o 十 

和 

十 1 

cs_i 十 天 
为 了 书写 的 方便 ,我 们 将 a 的 上 述 表 达 式 简写 为 
lh Wo 
Qt 十 十 -一 十 41 十 
的 形式 ， 
可 用 a 作为 4x 的 近似 值 , 得 到 a 的 近似 值 
i 1 1 1 


十 十 中 十 Qi 十 BM 

a 的 这 个 表达 式 称 为 有 限 连 分 数 , 它 可 以 化 为 普通 的 最 简 分 数 ps/gq , 称 
为 a 的 第 十 1 个 渐 近 分 数 . 面 p,/9o = ao/1 是 第 1 个 渐 近 分 数 . 

如 果 el: 二 0 对 某 个 ”成 立 , 即 4, 等 于 整数 4a, , 则 有 限 连 分 数 
1 了 1 1 


人 


是 a 的 准确 值 , “ 是 有 理 数 . 
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如 果 a 是 无 理 数 , 则 前 述 递 推 过 程 可 以 无 穷 地 进行 下 去 ,得 到 无 穷 的 整数 
列 aoyeiyez ya .而 & 被 表达 为 无 限 连 分 数 


Eo 1 
ye 
ee 让 1 
=lim[et 训 二 二 十 二 2 
每 个 渐 近 分 数 
这 二 
i 
都 是 4 的 分 数 近似 值 . 


上 面 所 说 的 求 a 的 连 分 数 展开 式 的 递 推 方法 适宜 于 用 计算 机 进行 . 好 果 
用 手工 进行 , 则 递 推 过 程 中 由 & 计算 4 二 1/s 这 一 步 的 计算 量 太 大 . 这 一 步 
也 就 是 用 1 除 以 6& 求 商 4; ,但 我 们 的 真正 目的 并 不 是 求 高 4 ,而 只 是 求 它 的 
整数 部 分 wx . 而 对 手工 笔算 来 说 , 求 ce 比 求 4 容易 得 多 . ai 就 是 1 除 以 4 作 
带 余 除 法 的 商 . 带 余 除法 的 定义 如 下 : 

带 余 除法 ” 设 4 是 实数 , 8 是 正 实数 ,9 是 使 96 委 a 的 最 大 整数 , 0 去 
二 a --gB 之 8B. 则 称 用 8 对 < 作 带 余 除 法 得 到 商 g 和 余数 7. 

《 注 :两 个 整数 想 除 的 带 余 除法 是 众所周知 的 ,这 里 只 是 把 它 推广 到 两 个 
实数 相 除 而 已 . 请 注意 , 带 余 除 法 的 商 9 就 是 准确 的 商 a/8 的 整数 部 分 . ) 

在 求 «的 连 分 数 展开 式 的 时 候 .第 一 步 求 a。 二 Ta| 及 & 一 “一 ao 很 容易 . 
而 且 可 以 认为 wovsl 分 别 是 a 除 以 1 的 整数 高 和 余数 . 下 一 步 是 求 A! 二 1/el 
的 整数 部 分 a1 .我 们 用 1 除 以 s, 作 带 余 除 法 , 求 出 整数 商 < 和 余数 一 一 
1 一 e007 之 十 . 则 


sa 二 所 | 一 ai 一 1 2 一 也 
1 1 
当 & 六 0 ,也 就 是 7 六 0 时 ,又 可 得 
i 
7 ra 


再 将 &1 除 以 rx; 和 作 带 余 除 法 ,得 到 整数 商 as 和 余数 rs 二 6 一 asrz ，0 护 73 之 7 
于 是 又 有 所 二 A 一 二 7s/r;. 当 7 六 0 时 有 As 一 m/r .这 个 过 程 可 按照 下 
面 的 递 推 法 则 进行 下 去 : 

驾 转 相 除 法 ”约定 -一 wo 一 1. 对 每 个 非 负 整数 二 , 设 已 经 得 到 了 
站 (一 1 雪 i 雪 4) 和 整数 w (0 委 ; 委 上 一 1). 当 一人 0 时 ,用 m- 除 以 关 作 
带 余 除法 ,得 到 整数 商 a 和 余数 ,| ，0 坟 ri 之 rh ; 当 ri 一 0 时 递 推 过 程 
终止 . 

已 经 求 得 a0,ai，… ,41** 之 后 ,如 何 求 各 个 渐 近 分 数 pi/gq: ? 有 以 下 递 推 


OO 
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算法 : 
约定 p-1 一 1:9-1 一 0 加 一 aordo 一 虐 
对 每 个 入 和 1 ,有 递 推 关 系 式 
Ps = pr? + aspr—i 
G4 = + i 


练习 3 


(1) 作 x 一 3.141 592 653 579.… 的 过 分 数 展 开 , 求 出 前 面 几 个 渐 近 分 数 . 
并 通过 观察 回答 下 面 的 问题 : 
iD 这 些 渐 近 分 数 是 否 是 练习 1 中 选 出 的 对 7T 作 最 佳 下 近 的 近似 值 ? 
ii) 这 些 渐 近 分 数 ps/g 是 不 的 不 足 近 似 值 还 是 过 剩 近似 值 ? 趟 的 准确 值 是 
否 在 任意 两 个 相 邻 两 个 渐 近 分 数 之 间 ? 
iji) 计 算 相 邻 两 个 渐 近 分 数 之 差 
Ps Pitl a 
ds E+1 Grd#~1 
的 分 子 以 ,中 此 得 出 关于 pi/9gi 的 误差 的 结论 
于 1 


和 
FrGe+1 a 


与 练习 2(2) 的 结果 相 比 较 . 
(2) 利 用 连 分 数 展开 将 练习 2 重 做 一 遍 . 


课外 思考 题 用 理论 推导 证 明 你 在 上 述 练 习 3(1) 中 观察 得 出 的 结论 对 
任意 实数 a 的 渐 近 分 数 都 成 立 . 


3.4 计算 对 数值 


对 给 定 的 正 实数 5,N 且 & 关 1 ,要 求 对 数值 a = logsN ,也 就 是 求实 数 “ 
使 r= 二 NN .如 果 能 找到 整数 p,9 使 NN , 刚 2% 寺 NN ,logsN ~ p/g .以 
lg 2( 即 logis2 ) 为 例 :由 2 二 1 024 守 1000 二 10’ 可 得 lg 2 过 3/10 二 0.3. 
再 要 提 遍 精确 度 , 就 要 找 出 更 大 的 9 使 2 更 接近 10 的 某 个 需 10 ,也 就 是 使 
27/10? 更 接近 1. 
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让 C& 依 次 取 遍 1 到 10000 的 所 有 的 正 整 数 . 对 每 个 9 , 按 如 下 的 递 推 法 则 
求 出 一 个 正 整数 妨 一 pl(g) 使 实数 4(9) 一 2"/10? 最 接近 于 1: 

dg 二 1 时 , p(1) 二 0,4(1) = 2'/10° 一 2. 

设 已 对 g 求 出 PC9) 和 A(Cg9) .计算 24(9) ( 即 24:7104 ). 如 果 24(9) 过 
V10 , 则 取 plg 十 1) 二 p(g),Ag 十 1) = 24(q) ,如果 24(g) 实 V10 , 则 取 
plg++ 1 = plg) + 1,Alg + 1) = 24(9)/10. 

如 果 9) 比 以 前 所 有 的 AM (1 过 7 扩 qq 一 1) 都 更 接近 1, 即 
14(9) 一 1 < 之 14 站 一 1[ 对 所 有 的 1 人 i 人 9 一 1 成立, 就 取 p/g 作为 lg 2 的 
一 个 近似 值 , 这 样 得 出 的 p/g 都 是 最 侍 下 近 ]lg 2 的 分 数 近 似 值 ,它们 可 以 展开 
成 小 数 近 似 值 , 试 自 己 信 计 这 些 近 似 值 的 误差 范围 . 


练习 4 的 方法 当然 是 一 个 笨 办 法 . 试 一 试 这 个 笨 办 法 ,你 才能 更 体会 到 下 
面 的 连 分 数 展开 法 的 快捷 ， 

求 对 数 logsN 的 驾 转 相 除 法 取 和 六 ,= 人 N，No 一 .对 每 个 整数 上 六 0， 
如 于 已 经 知道 所 有 的 N; (一 1 全 i 全 上) 及 a;(0 信 1 仿 上 & 一 1), 列 可 按 下 面 
的 方法 求 出 Neri 和 ex : 

将 Nt 连续 除 以 若干 个 Me ,直到 所 得 的 商 4 二 Ni-1/Ne 满足 条 件 1 么 
4 一 入; 为止, 则 连 除 的 Nx 的 个 数 就 是 as ,而 商 4 就 是 Ni ,如 果 某 个 No 一 
1 , 则 递 推 过 程 终 止 ， 


1 1 1 
A 


是 有 限 连 分 数 从 而 是 有 理 数 . 否则 , 递 推 过 程 可 以 无 限 地 进行 下 去 ， 
全 1 1 1 
OgsN 二 an 十 一 


ii 十 人 十 十 如 十 … 
被 展开 成 无 限 连 分 数 . 
想 一 想 这 个 方法 为 什么 是 正确 的 ? 
注意 : easy wk 所 满足 的 条 件 1 和 No = NANw < 二 RN 也 就 是 0 所 
tag 一 log NM 一 cudogsvs < logsNi .这 也 就 是 说 : logsNi_! 除 以 logsNs 
得 到 商 a 和 余数 logs Ni+1 .因此 ,我 们 实际 上 就 是 在 用 3. 3 的 怨 转 相 除 法 求 
logsN 的 连 分 数 展开 式 . 


用 上 述 轰 转 相 除法 求 lg 2 的 前 几 个 浙 近 分 数 , 展 开 成 小 数 近 似 值 并 传 计 


3.5 二 元 一 次 不 定 方程 的 整数 解 27 


它们 的 误差 . 将 所 得 的 结果 与 练习 4 的 结果 作 上 比较 . 


注 计算 对 数 log,N 的 通常 的 方法 是 利用 Taylor 展开 式 
zx El 1 pm 
ee i 

分 别 求 出 in N ,in 5 ,再 利用 挤 底 公式 logsN 二 In N/nb. 当 N= 二 1 十 x 与 1 
相差 太 远 时 Taylor 级 数 不 收 伍 或 收 伍 得 慢 . 此 时 可 选 适当 的 Ni 
使 每 个 Ni,N,s,… ,NN 都 很 接近 1, 且 NN 一 NjN2…N ,从 而 im 一 ln 十 


In Ns 十 … 十 ln N,. 对 Iln5 也 可 用 同样 的 办 法 处 理 , 


ln(] 十 x) 二 x 一 


3.5 二 元 一 次 不 定 方程 的 整数 解 


问题 设 a,6,c 是 整数 , 求 二 元 一 次 方程 xz 十 by 一 c 的 整数 解 . 
不 妨 设 a,6 都 不 为 0, 否 则 方程 很 容易 解 , 必要 时 交换 未 知 数 zx,y ,可 化 
为 |al 实 51 的 情形 ,并 可 使 a > 0. 
利用 3. 3 所 介绍 的 轻 转 相 除法 ,可 以 得 到 余数 数列 a,15|,r1,r,,… 和 商 
数列 euyaiyas，… 使 ~>-, 除 以 六 的 商 为 w ,余数 为 m-，. (约定 4 一 一 :，|6| = 
ro. ) 由 于 六 是 逐步 减少 的 正 整数 ,必然 有 某 个 rat 一 0 天 mm， 余数 数列 和 商 数 
列 终 止 , 最 后 一 个 非 零 的 x 就 是 a,6 的 最 大 公约 数 4 二 (a,6). 而 分 数 商 被 


展开 成 有 限 连 分 数 


1 1 = 由 
1 十 az 十 十 4 十 


去 掉 这 个 连 分 数 的 最 后 一 项 地 ,再 将 所 得 的 连 分 数 化 成 普通 的 赋 约 分 数 志 ， 


则 苔 是 种 | 的 渐 近 分 数 近似 值 


二 
4 ”al 十 as 十 … 十 en-s 十 ar-i 
误差 
区 | 二 2 
12| 全 lalv 


于 是 az 一 1elz 二 ed ,一 士 1. au(ev) 一 |61(eu) 二 4 .如果 c 不 被 4 整除， 
则 原 方程 无 整数 解 , 否则 , + 一 了 是 整数 , a(sto) 一 |5|(stw) 一 c. 设 6 一 
Pls1,Pp 一 土 1. 则 


Xo = tv Yo 一 一 EPtu 
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是 方程 az 十 by 二 < 的 一 组 整数 解 . 方程 的 通 解 为 


Ap ha 
Z 二 xzo 十 本 ， > 了 ”> 过 


其 中 取 遍 所 有 整数 . 


求 二 元 一 次 方程 1 234 567x 一 7654 321y 二 1 的 最 小 正 整 数 解 . 


附录 和 连 分 数 的 性 质 


设 
1 1 ol 
We 
Pe 二 二 一 名 (YlShCn) 


ai 十 as 十 … 十 人 a 
并 定义 po 二 aosgo 一 1，o 二 po/9o 二 aof/1. 我们 希望 研究 用 渐 近 分 数 
peer 之 0) 遂 近 a 时 的 误差 . 
1. 设 0 三 上 二 一 1. 当 衣 为 偶数 时 ,过 a < at 当 上 为 奇数 时 , a 盖 
4 六 qtri. 总 之 ,9 在 名 与 ri 之 间 , 从 而 le 一 和 < |a 一 ai|. 
证 明 . 对 每 个 0 二?i 志 , 记 


Es 1 -1 工 
B= at Crl 十 中 十 Gx-1 十 区 


则 有 = ap 十 遍 , 汪 一 色 . 
由 4 > 一 所 得 
i 一 ai 十 款 <o-: 十 款 一 P-， 


再 得 A 二 > :十 可 一 Bs 


照 此 下 去 ,i 每 增加 1, A,_, 与 8-, 之 间 的 大 小 关系 就 颠倒 一 次 . 为 偶数 时 
4 之 Bi 为 奇数 时 则 4 ,< 8 . 取 ; 一 大 即 可 得 出 与 之 间 的 大 小 
关系 . 
2. 取 p_i 二 1,9-1 二 0,po 二 0o19o 一 1. 则 递 推 关 系 式 
Pi =apri ps 和 9 = Ql az 
对 之 1 成立 . 
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证 明 . 对 过 用 数学 归纳 法 . 

无 二 1 寺 ， 
P11 _ 1 Qiao tl 
好 1 4 Go 


Pi=aat l= apot pi 
2) 一 ao 一 aido 十 9 1 
设 递 推 公式 对 1 2， 一 已 成 立 . 则 在 公式 


_ Pit _ Qibr-s tt pe 3 
Ql 二 人 一 二 一 一 
Gx 一 ) hk-194-2 十 Gea 


中 将 w_， 换 成 at_, 十 去 就 得 到 
{0 十 二 pe 十 pi_a 


a 一 


1 
(a 十 }a 十 gt-s 


本 Pr! 十 pe 


G4-1 十 gs- 
api-1 十 Pr-s 
GiGi1 十 Qi-z 
于 是 
Pi =apii+ ps 和 gi = Ard + qr: 
成 立 ， 


3. 对 0 过 nn 一 1 ,Pi/qs 一 bigqti 一 中 /exet) 的 分 子 
di 一 pigal qrprti = (— 1)*! 


ps 上 一 1 
他 Grq#+1 Qt 


a— 


证 明 . 对 用 数学 归纳 法 . 
当 上 一 0 时 ,do = pogi ~ gop1 = dod1— l(a 二 1)=—1. 
设 到 = 一 1) 辣 对 0 委 : 委 二 一 1 已 成 立 . 则 
ds 一 加 gt 一 Gspiti 
一 如 (as+tde 十 G4-1)》 一 greasripe + pr-1) 
= pd-1 一 qips—i1 
一 一 di = (— 1) = (— D+! 


从 而 


实验 四 ”数列 与 极 数 


极限 是 微 积分 芒 至 整个 数学 分 析 最 重要 的 基本 内 容 之 一 . 远 在 公元 前 三 
世纪 , 古 希 腊 人 Archimedes 就 采用 了 数列 极限 的 思想 来 计算 曲 边 三 角形 的 面 
积 . 本 实验 的 目的 是 通过 计算 机 发 现 数列 的 规律 与 极限 状态 的 性 质 ， 

所 谓 一 个 无 穷 数 列 是 指 按 一 定 顺 序 排 烈 的 一 串 数 字 


他 1 92 (1) 
而 一 个 无 穷 级 数 则 大 用 无 穷 项 数字 构成 的 和 式 
> ya 一 al 十 es 十 … (2) 


数列 与 级 数 有 密 不 可 分 的 关系 . 给 定 一 个 无 穷 级 数 (2}, 它 唯 一 地 确定 了 一 个 
无 穷 数 列 
Sl Ss 
其 中 5 二 a 十 … 十 a ,#8 二 1,2,"…. 肥 过 来 ,给 定 一 个 无 穷 数列 (1), 它 也 唯 
一 地 确定 了 一 个 无 穷 级 数 
> 

这 里 锯 一 al ,如 一 an 一 col 7 一 23，…， 并 且 ,无 穷 级 数 的 和 就 是 相应 的 无 
穷 数 列 的 极限 。 因 此 ,无穷 数 列 与 无 穷 级 数 是 可 以 相互 转化 的 . 

给 定 的 数列 {a,} ,人 们 最 关心 的 问题 是 : 

1. 数列 a, 有 什么 规律 与 性 质 ? 

2. 当 = >~ co 时 ,数列 a。 的 极限 是 什么 ? 

3, 极限 是 否 是 一 个 有 限 的 数字 ? 还 是 无 穷 大 ? 抑或 极 本 不 存在 ? 

4, 如 果 极 限 是 无 穷 大 ,那么 它 趋 于 无 穷 大 的 阶 是 多 少 ? 

5. 如 果 数 列 的 极限 极 本 不 存在 , 那 它 在 无 穷 大 时 的 极限 状态 又 怎么 样 ? 

对 于 给 定 的 一 个 无 穷 级 数 ,也 可 以 提出 上 述 类 似 的 问题 . 

本 实验 将 通过 计算 机 图 示 的 方法 来 帮助 我 们 发 现 数列 的 规律 及 其 极限 行 
为 .我 们 以 Fibonacci 数列 为 例 来 探讨 上 述 问题 . 


4.1 Fibonacci 数列 


给 定 如 下 的 数列 
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1+1,2,3,5.8,13.,21,34,55,89,. 
其 递 推 关 系 式 由 
Fos= Ft Fs n=12,…, F=1,Ff,=]1 (3) 

给 出 . 该 数列 被 称 为 Fibonacci 数列 . 

Fibonacci 数列 经 常 以 著名 的 养 兔 问题 提出 来 . 某 人 养 了 一 对 兔子 ( 公 母 
各 一 只 ). 一 月 后 ,这 对 兔子 生 了 一 对 小 免 . 以 后 每 月 ,每 对 成 熟 ( 即 一 月 以 上 )》 
的 兔子 都 生育 一 对 小 免 . 假设 兔子 不 会 死亡 , 问 一 年 后 总 共有 多 少 对 兔子 ? 显 
然 , 问 题 的 答案 就 是 数列 的 第 十 二 项 . 

为 考察 Fibonacci 数列 的 极限 与 规律 ,我 们 用 计算 机 计算 出 Fibonacci 数 
列 每 一 项 的 值 , 并 在 二 维 平 面 上 画 出 顺 次 连接 点 (n,F,) ,n= 二 1,2,…,N 的 折 
线 图 ,其 中 N 是 一 个 大 整数 ， 


练习 工 
分 别 取 和 N= 二 20,50,100,200,500 ,观察 Fibonacci 数列 的 折线 图 
Fibonacci 数 列 是 否 单调 增 ? 它 是 否 趋 于 无 穷 ? 它 增 加 的 速度 是 快 还 是 慢 ? 体 能 
否 证 实 你 的 观察 ? 


为 进一步 研究 Fibonacci 数列 F, 的 特性 ,我 们 将 F, 取 对 数 , 在 直角 坐标 
系 中 面 出 顺 次 连接 点 (n,log(F.)) , n 二 1,2,-…,N 的 折线 图 . 此 时 的 折线 图 
近 平子 一 条 直线 . 因此 ,我 们 猜测 log (F.) 是 = 的 线性 函数 . 取 六 一 1 000 ,对 
上 述 数 据 进 行 拟 合 可 得 
log CF.) ~ — 0.803 903 + 0. 481 211 2 (4) 
故 
Fr ~ 0.447 567，1. 618 03” (5) 


分 别 取 入 二 2 000,，5 000，10 000 ,用 直线 去 拟 合 数 据 (ns,log(F,))， 
nn 一 11,2, JN ,由 此 求 数列 ,的 近似 表示 . 注意 观察 log(F,) 的 线性 项 的 系 


数 , 它 与 黄金 分 割 数 有 何 联系 ? 
由 计算 机 观察 到 的 上 述 结果 我 们 似乎 可 以 猜测 数列 F. 的 通 项 具有 形式 


本， 一 Cr (6) 
将 上 式 代入 递 推 公式 (3) 得 | 
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所 一 7 十 1 (7) 
从 而 > 一 二 十- 5 .因为 数列 趋 于 无 穷 , 故 取 r 一 上 士 j .于 是 
六 (8) 


然而 ,公式 (8) 并 不 满足 F = 下: 二 1 , 即 并 非 数列 , 的 通 项 公式 . 不 过 , 它 仍 
然 是 数列 FF, 的 主 项 . 


练习 3 | 


证 明 公 式 (8)》 不 是 Fibonacci 数列 的 通 项 . 


为 进一步 得 到 Fibonacci 数列 的 通 项 ,我们 构造 数列 
b, 一 站， 一 《和 
将 上 式 代 人 公式 37 可 得 数列 乌 仍然 满足 递 推 公式 43). 因而 我 们 猜测 ,数列 
& 的 通 项 也 具有 形式 


1 一 v5 


其 中 > 也 满足 方程 (7), 故 ”一 > . 这样, 我 们 得 到 Fibonacci 数列 的 通 
项 的 一 个 新 的 猜测 
五 ,一 < 天 十 避 六 
Fo Re 有 
由 条 件 FF, 二 F, 二 1 确定 出 c J -二 ;从 而 我 们 得 到 
lil1l+v5)_il~v5) 
和 方 (| 2 | 2 | 3 


EA 


这 样 ,Fibonacci 数列 趋 于 无 穷 的 阶 为 -| 汪 


V5 
ESE 


验证 (9) 式 正 是 Fibonacci 数列 的 通 项 公式 ， 


Fibonacci 数列 与 自然 界 中 的 许多 现象 ,如 6 植物 的 枝 于 与 叶子 的 生长 有 紧 
密 的 联系 . 它 在 纯 数学 领域 的 一 个 极为 成 功 的 应 用 是 协助 前 苏联 数学 家 马 蒂 
雅 会 维 奇 解决 了 著名 的 Hilbert 第 十 问题 . 此 外 , 它 在 优化 .运筹 以 及 计算 机 
科学 与 艺术 领域 都 具有 极 大 的 应 用 价值 .下面 我 们 来 “ 听 一 听 ”Fibonacci 
数列 . 
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了 一 整数 za (如 加 二 51 ), 将 Fibonacci 数列 模 m 得 到 一 周期 数列 ,将 该 


周期 数列 的 值 作为 音 高 ,编程 演奏 它 . 取 不 同 的 m :或 将 几 段 合并 ,感受 旋律 
的 变化 ， 


4.2 调和 级 数 


熟知 ,无穷 级 数 
(10) 


当 a 六 1 时 收敛 , 当 a 志 1 时 发 散 。 特别 地 , 当 a 二 1 时 ,级 数 (10) 称 为 调和 级 
数 . 

一 个 令 人 感 兴趣 的 问题 是 ,调和 级 数 发 散 到 无 穷 的 速度 有 多 快 ? 或 者 说 数 
列 
S, 一 1 十 方 
趋 于 无 穷 的 速度 有 多 快 ? 

一 个 直观 的 方法 仍然 是 画 出 由 点 (4,5.) ,z 二 1,2,… ,NN 构成 的 折线 图 . 


取 充 分 大 的 NN ,观察 调和 级 数 的 折线 图 . 你 觉得 它 发 散 的 速度 是 快 还 是 
慢 ? 将 它 的 图 形 与 一 zy 一 VX 以 及 y 二 YX 做 比较 , 谁 的 发 散 速 度 快 ? 


Py SO 
3 n 


从 上 述 实验 的 结果 看 出 ,调和 级 数 发 散 的 速度 较 慢 . 但 是 , 它 到 底 以 什么 
样 的 速度 发 散 到 无 穷 ? 让 我 们 再 做 下 面 的 练习 . 


对 充分 大 的 一 系列 nn ,计算 So 一 9。 ,体能 知 精 测 出 Sze 一 3。 当 球 趋 于 无 
穷 的 极限 ? 更 一 般 地 , Swts 一 S。 趋 于 无 穷 的 极限 是 什么 ? 反 过 来 ,固定 ,让 上 
赵 于 无 穷 ,Ss 趋 于 无 穷 的 速度 是 什么 ?你 能 知 由 此 得 出 沪 。 当 于 趋 于 无 穷 的 极 
限 阶 ? 
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我 们 也 可 以 从 另 一 个 角度 考察 上 述 问 题 . 


| 练习 8 

用 J(n) 表示 不 小 于 9 的 最 小 整数 ， 

1. 对 nn 三 1，,2,，…,N(N 是 某 个 大 整数 ), 计 算 JC2n) 一 J(n) .你 能 做 出 
什么 猜测 ? 对 每 个 7 , 设 JGn) 二 JO) 十 1, 则 m/n 的 范围 是 什么 ? 

2. 对 每 个 到 二 1,2,…130 , 邻 坟 是 使 得 J(n) 一 za 成 立 的 聂 大 整数 ,我 们 
把 它 记 为 LC(m) . 试 计算 比值 LCm 十 1)/LCm) .体能 据 此 做 出 何 种 猜测 ? 当 
Ma 越 于 无 穷 时 , (mm) 关于 rm 的 阶 是 多 大 ? 由 此 ,S, 关于 的 家 限 阶 是 多 少 ? 


对 调和 级 数 做 更 仔细 的 分 析 , 可 以 得 到 更 精细 的 结果 . 有 兴趣 的 读者 不 妨 
做 进一步 的 探讨 . 


4.3 思考 问题 


作为 本 实验 的 实验 内 容 , 请 读者 研究 下 列 数列 的 极限 状态 与 规律 . 

问题 1 设 a.+i 一 a 十 十 ,a 一 1 ,研究 数列 a 的 极限 行为 

(1) 在 平面 上 画 出 硕 次 连接 点 (1,a,) ,7 二 1,2,… ,2 000 的 折线 图 . 

(2) 根 据 上 述 图 形 ,你 认为 数列 a, 的 极限 是 什么 ? 

(3) 用 一 恰当 的 阻 数 y = f(z) 去 拟 合 上 述 图 形 . 

4) 猜测 数 列 a, 的 极限 阶 . 

(5) 你 能 否 证 明 你 的 结论 ? 

问题 2 研究 数列 a = sin(z) 的 极限 状态 的 规律 . 

(1) 在 平面 上 画 出 点 列 (aas) ;一 1,2,"…N (如 和 N= 二 5 000). 

(2) 极 据 上 述 图 形 , 你 认为 数列 a。 的 极限 是 否 存 在 ? 

C3) 你 能 从 上 述 图 形 中 观察 到 点 列 的 分 布 有 什么 规律 ? 

(4) 你 能 否 证 明 所 观察 到 的 规律 ? 

(5) 任 取 区 间 [a.5] 己 [一 1,1] , 画 出 数列 中 落 在 区 间 [ae,b] 中 的 点 .将 
区 间 [4, 如 放大 并 取 不 同 的 N ,观察 落 在 区 间 [ea,2 中 的 点 集 有 和 何 变化 . 

(6) 根 据 以 上 观察 ,你 认为 数列 a 的 集 点 集合 是 什么 ? 你 能 否 证 明 你 的 
结论 ? 
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问题 3 考察 由 如 下 关系 确定 的 正 整 数 数列 
3z, 十 1 如果 x, 为 奇数 
| | 如 果 z, 为 偶数 
任 取 一 正 整数 作为 初 值 x ,计算 数列 <,，, 并 在 平面 坐标 系 中 用 折线 连接 
Gsz,) ,一 0,1,…,N . 取 不 同 的 初 值 + ,观察 所 得 的 结果 . 你 能 发 现 数列 
7。 有 什么 规律 吗 ? 你 能 否 尝试 证 明 你 所 发 现 的 规律 ? 
问题 4 研究 Farey 数列 的 规律 与 项 数 . 
给 定 整数 ,将 分 母 不 超过 的 所 有 真 分 数 (以 最 简 分 数 形式 出 现 ) 从 小 
到 大 排列 ,记得 到 的 数列 称 为 阶 Farey 数列 . 例如 , 6 阶 Farey 数列 是 二 ， 
i ,十 ， : 9 + 3: , 子 ， 卫 ,全 ， 训 .对 nn 阶 Farey 数列 ,我 们 要 问 它 
有 多 少 项 ? 相 邻 各 项 之 间 有 何 联系 ? 为 研究 这 些 问 题 ,请 做 以 下 实验 . 
(1) 任 取 一 Farey 数列 ,考察 任意 相 邻 三 项 之 间 的 关系 . 将 头 尾 两 项 的 分 
子 分 母 分 别 相 加 ,所 得 分 数 是 什么 ? 你 能 因此 做 出 什么 样 的 猜想 ? 你 能 否 证 明 
你 的 猜想 ? 
(2) 考 察 Farey 数列 相 邻 两 项 的 差 ,你 能 得 到 什么 结论 ?你 能 否 证 明 你 的 
结论 ? 
(3) 将 Farey 数 询 的 每 一 项 碱 去 去 ,所 得 到 的 新 数列 有 什么 性 质 ? 


(4) 用 a 表 n 阶 Farey 数列 下 ,的 项 数 .观察 n 阶 Farey 数列 和 十 1 阶 
Farey 数列 的 关系 . 由 此 , a, 与 a,.! 有 何 关系 ? 

(5) 将 点 列 (aas) ,n= 二 2,3. 呈 ,N( 如 NN 一 1 000 ) 标 在 二 维 坐 标 平面 上 
‘可 用 折线 将 它们 连接 起 来 ). 猜测 a 与 4 的 泣 数 关系 ,并 拟 合 之 . a, 的 极限 阶 


是 多 少 ? 注意 ,极限 阶 前 的 常数 与 十 有 何 关系 ? 


(6) 用 严 ， 表示 F, 的 第 项 ,并 令 D, 一 a 用 (5) 类 似 的 


办 法 估计 D; 的 极限 阶 . 据 此 ， 你 能 做 出 何 种 猜测 ?在 这 里 ， 你 要 非常 小 心 . 你 做 
出 的 猜测 很 可 能 与 著名 的 Riemann 猜想 ( 见 有 关 素 数 的 实验 ) 有 某 种 联系 . 
问题 5 在 调和 级 数 中 ,将 分 母 的 十 进 制 表 示 中 含有 数字 9 的 项 去 掉 ,由 
此 得 到 的 级 数 是 收 伍 还 是 发 散 呢 ?请 根据 本 实验 中 介绍 的 方法 做 和 仔细 的 分 析 . 
问题 6 考察 a == 2 时 ,级 数 (10) 的 一 些 结果 . 
(1) 对 充分 大 的 NN ,计算 级 数 的 前 N 项 和 ,并 计算 它 与 mw 的 比值 . 你 能 否 
据 此 猜测 级 数 (10) 的 和 ? 
(2) 设 p= 二 2,p; 一 3，… 是 按 顺 序 排列 的 素数 . 考察 无 穷 乘 积 
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1 
Be om 
试 计 算 该 无 穷 乘 积 的 近似 值 . 这 个 值 与 (1) 中 级 数 的 和 有 何 关 系 ? 由 此 ,你 能 做 
出 什么 样 的 猜测 ? 你 能 否 证 明 你 的 猜测 ? 
《3) 你 能 否 猜 测 ,对 一 般 的 < > 1 ,无 穷 级 数 (10) 的 和 与 哪个 无 穷 胰 积 相 
等 ? 
需要 再 次 提醒 读者 ,本 问题 与 Riemann 猜想 也 有 着 干 丝 万 缕 的 联系 . 


附录 。 Mathematica 程序 


下 面 是 本 实验 中 的 有 关 Mathematica 程序 . 使 用 时 ,只 要 输入 并 调用 相关 
函数 即 可 ， 


1. 画 Fibonacei 数列 折线 图 的 函数 


FibShow[n_Integer] : 一 
Module[ 
{t = {},i}, 
For[li = 1,i<= ni 十 ,AppendTo[t, {i,Fibonacci[i]}]]; 
ListPlot[ft ,PlotJoined ~—> True | 
J 


2. 用 直线 去 拟 合 Gi,log (EF)) ,i 二 1,2,…,n 的 函数 


FibFit[n._ Integer ] : = 
Module[ 
{t = {},i}, 
For1i 一 41, 一 一 n,i 十 十 ,AppendTo[t,{i,Log[Fibonaccifi]])]]; 
Fit[t, {1,x) ,x] 
] 


3. 演奏 Fibonacci 数列 的 隧 数 
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FibPlay[n_Integer] : = 
Module[ 
{t = {},i}, 
For[i = 1,i<=n,i 二 二 ,AppendTo[t,Mod[Fibonacci[i],nj jj]; 
ListPlay[t,PlayRange 一 > {0,n},SampleRate 一 > S] 
J 


4. 显示 点 列 (i,sin(i)) ,i 二 1,2,…,n 的 函数 


PlotList[n. Integer | : = 
Modulel 
{t = {},i}, 
Forfi = Li<= 1n,i 二 十 ,AppendTo[t, {i,Sin[il} |]; 
ListPlot{[t, PlotStyle 一 > {PointSize[0, 005]}] 
] 


5. 级 数 (10) 的 部 分 和 
HamoSum[n_Integer ,m_Jnteger ] : 一 
Module[ {i}, 


Sum[ 1/i°~ m, {i,1,n}] 


] 
6. 级 数 (11) 的 部 分 积 
PrimeProd[n_Integer]: = 


Module[ {i},N[Product[ (1 一 1/Prime[i]” 2),{i,1,n}]] 
J] 
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实验 五 素 数 


伟大 的 德国 数学 家 高 斯 说 过 ,数学 是 科学 的 女王 ,而 数论 则 是 数学 的 女 
王 . 在 数论 这 一 充满 了 趣味 而 布 满 斌 环 的 领域 中 ,有 关 素 数 的 问题 (如 著名 的 
Goldbach 猜 想 ) 始 终 是 最 富有 购 力 最 吸引 人 的 研究 问题 . 本 实验 将 探讨 素数 的 
规律 及 其 相关 的 某 些 有 趣 问 题 . 具体 地 ,我 们 将 研究 有 关 素 数 的 下 列 问题 ， 

“ 素数 表 的 构造 

"素数 的 判别 

* 最 大 的 素数 

' 构造 生成 素数 的 公式 

“ 素数 的 分 布 

我 们 希望 通过 本 实验 激发 你 对 数论 的 好 奇 心 , 使 你 对 自然 数 的 神奇 规律 
而 折服 ,同时 使 你 认识 到 探索 自然 数 规律 的 艰难 性 . 


5.1 素数 的 判别 与 求解 


熟知 ,如 果 一 个 大 于 1 的 自然 数 只 能 被 1 及 它 本 身 整除 , 则 该 数 称 为 素 
数 . 否则 则 被 称 为 合 数 . 从 数学 史 的 黎明 时 期 开始 ,数学 家 就 一 直 在 探索 自然 
数 的 奥秘 . 远 在 古 希 腊 时 代 , 欧 几 里 得 就 证 明了 每 一 个 合 数 都 可 以 分 解 为 若干 
个 素数 的 乘积 ,并 且 在 不 计较 素数 排列 顺序 时 这 种 分 解 是 唯一 的 ,这 就 是 所 谓 
的 算术 基本 定理 .算术 基本 定理 表明 ,素数 是 构造 自然 数 的 基石 ,正如 物质 的 
基本 粒 于 一 样 . 正 是 由 于 素数 如 此 重要 的 地 位 才 使 得 一 代 又 一 代数 学 家 努力 
邮 探 询 素数 的 规律 .首先 ,一 个 最 基本 的 问题 是 

水 数 到 底 有 多 人 少 个 ? 

会 不 会 在 某 一 充分 大 的 自然 数 以 后 就 没有 素数 呢 ? 证 我们 先 做 以 下 实验 . 


假设 已 知 前 六 个 素数 ,它们 按 从 小 到 大 的 顾 序 排列 为 Pi 一 2,p; 一 3， 
Pr 对 二 1,2,… ;20 ,计算 Ns 一 记 pz…pr 十 1. 问 :1) N, 是否 部 是 素数 ? 
2) 如 果 NN, 不 是 素数 ,RN 是 否 爹 有 不 同 于 p, ,一 1,2,… 和 的 素 因 于 ? 
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根据 练习 荆 的 结果 ,猜测 素数 是 否 有 无 穷 多 个 ? 试 给 出 你 的 证 明 . 


关于 素数 的 下 一 个 基本 问题 是 

如 何 求 出 小 于 某 一 给 定 整 数 的 所 有 素数 ? 

而 希腊 另 一 位 学 者 Eratosthenes 给 出 了 解决 这 一 问题 的 方法 ,这 一 方法 
被 后 人 称 为 Eratosthenes 饰 法 . 

Eratosthenes 筛 法 的 基本 思想 是 ,将 自然 数列 从 2 开始 按 硕 序 排列 至 某 
一 整数 六 .首先 ,从 上 述 数 列 中 划 除 所 有 2 的 倍数 (不 包括 2 ). 在 剩 下 的 数 
中 , 除 2 外 最 小 的 是 3 .接着 ,从 数列 中 划 掉 所 有 3 的 倍数 (不 包括 3 ) 然后 在 
剩 下 的 数 中 ,再 划 去 5 的 倍数 ……. 这 个 过 程 一 直 进 行 下 去 . 则 最 后 剩 下 的 数 
就 是 不 超过 NN 的 所 有 素数 . 信用 Eratosthenes 得 法 ,经 过 众多 学 者 的 艰辛 努 
力 :D.N.Lehmer 于 1914 年 编织 出 了 10 000 000 以 内 的 素数 表 . 


利用 Eratosthenes 短 法 ,手工 编写 100 以 内 的 素数 表 . 据 此 ,你 如 何 居 量 
利用 得 法 编写 10 000 000 以 内 的 素 教 表 的 工作 量 ? 


利用 Eratosthenes 惠 法 ,通过 计算 机 编程 求 10 000 以 内 的 所 有 素数 ， 


第 法 是 用 乘法 寻找 察 数 . 实际 上 ,也 可 以 用 除法 判别 一 个 数 是 否 是 素数 . 
而 且 , 用 除法 的 效率 可 能 会 更 高 . 假设 我 们 已 经 找到 了 前 = 个 素数 p, 一 2， 
pz 二 3,…，p。 ,为 了 寻找 下 一 个 素数 我 们 从 pp, 十 2 开始 依次 检验 每 一 个 整数 
N ,看 NN 是 否 能 被 某 个 p, ,i 二 1,2,… 光 整除 .如 果 六 能 被 前 而 的 某 个 素数 
整除 , 则 NN 为 合 数 . 否则 入 即 为 下 一 个 素数 p.1;. 实际 上 ,为 了 提高 算法 的 效 
率 ,我 们 不 需 用 前 面 的 每 一 个 案 数 去 试 除 N ,而 只 需 用 不 超过 YN 的 素数 去 
除 就 可 以 了 . 
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练习 5 


利用 试 除 方法 ,通过 计算 机 编程 求 10 000 以 内 的 所 有 素数 . 试 将 试 除法 
与 筛 法 进行 比较 , 哪 一 个 更 有 效 ? 


虽然 从 理论 上 来 说 ,Eratosthenes 得 法 和 试 除 方法 可 以 求 出 所 有 的 素数 ， 
但 是 通过 上 面 的 练习 你 可 能 会 发 现 ,利用 这 些 方法 构造 大 的 素数 表 是 不 切实 
奈 的 . 例如 , 诸 构 造 10" 以 内 的 素数 表 , 利 用 当今 最 快 的 计算 机 也 得 需要 一 百 
亿 年 . 实际 上 ,数学 工作 者 一 直 在 致力 扩大 素数 表 的 范围 . 寻找 更 大 的 素数 不 
仅 是 数学 爱好 者 的 乐趣 ,更 是 实际 应 用 工作 者 (如 密码 编码 老 ) 努 力 追 寻 的 事 . 
数 十 年 前 , 象 11…1 (23 个 1) 以 及 2 一 1 的 素性 判别 问题 难 倒 了 许多 容 智 
的 数学 家 . 当今 ,数学 家 研究 出 了 一 套 非 常 复杂 而 高 深 的 技巧 来 对 数 的 素性 进 
行 检验 . 寻找 到 的 最 大 素数 的 高 峰 一 股 劲 地 向 上 无 限 攀 升 . 截止 到 1996 年 
11 月 ,所 找到 的 最 大 素数 是 21 25 一 1 ,其 十 进 制 形式 有 40 万 位 ! 为 了 领略 
一 下 隐藏 在 这 些 高 深 技 巧 下 而 的 数学 思想 ,让 我 们 先知 以 下 实验 . 


对 于 一 2,3，…，100 ,观察 2 ! 被 n 整除 所 得 的 余 歼 .从 观察 结果 你 能 得 
出 什么 结论 ?再 取 其 它 的 整数 可 (如 3,4,5 ) ,观察 m"! 被 nn 整除 的 情况 .特别 
注意 观察 当 叶 为 素 教 时 的 结果 ,你 能 否 因此 确信 体 的 结论 ? 进一步 ,你 所 得 出 
的 结论 的 谱 命 题 是 否 成 立 ? 由 此 ,用 体 的 结论 能 否 给 出 判别 一 个 数 是 否 是 素数 
的 判别 方法 ? 
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对 互 质 的 整 教 一 2 及 亚 一 1,2 ,1000 , 求 使 得 ne 除 1m 的 余数 为 1 的 
最 小 整数 qd, 当 黄 为 素数 时 ,观察 与 m 之 间 的 美 系 ,你 能 得 到 什么 结论 ? 类 
似 地 ,对 7 二 3,4,5 做 进一步 的 观察 ,体能 否 确信 你 的 结论 ? 你 所 得 出 的 结论 
的 逆 命题 是 否 成 立 ? 


上 述 实验 表明 ,给 出 一 个 简明 的 素数 判别 准则 并 不 容易 - 通常 需要 将 更 多 
高 深 的 技巧 与 之 结合 才能 给 出 判别 素数 的 更 有 效 方法 ， 


对 于 具有 特殊 结构 的 数 的 素性 判别 ,有 更 加 快捷 的 方法 . 这 方面 最 引 人 注 
目的 例子 是 Mersenne 数 , 即 形 如 2" 一 1 的 数 .利用 Mersenne 数 可 以 构造 出 
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非常 大 的 素数 ,如 前 面 指出 的 最 大 素数 . 


对 半 一 2,3 300 ,判断 哪些 Mersenne 数 好 ,一 2 一 1 是 素数 ? 如 果 n 
为 合 数 ,Mersenne 数 1d, 是 素数 还 是 合 数 ?如 果 于 为 素数 ,Mersenne 数 是 否 一 
定 是 素数 ? 


从 练习 8 中 可 以 看 到 ,Mersenne 索 数 是 极其 稀少 的 . 借助 大 型 计算 机 的 
威力 ,截止 96 年 11 月 ,数学 家 仅 发 现 了 34 个 Mersenne 素数 . 它们 对 应 的 = 
是 , 2, 3, 5, 7, 13, 17, 19, 31, 61, 89, 107, 127, 521, 607, 1 279, 2 203， 
2 281, 3 217, 4 253, 4 423, 9 689, 9 941, 11 213, 19 937, 21 701, 23 209， 
44 497, 86 243, 123 049, 216 091, 756 839, 859 433, 1 257 787, 1 398 269. 
从 中 可 以 看 出 ,Mersenne 案 数 的 分 布 是 极 不 规则 的 . 如 何 通 过 有 送 断 MM, 是 否 
是 素数 ? 数学 家 Lucas 与 Lehmer 早 在 1930 年 就 给 出 了 具体 可 行 的 判别 方 
法 . 假定 为 素数 ,定义 数列 

ul = dU! Eu 2 mod ad 
大 二 1,2,… sn .如果 wi 二 0 mod MM , 则 MM 为 素数 . 否则, M 为 合 数 . 前 面 
列 出 的 Mersenne 素数 就 是 在 此 算法 的 基础 上 发 现 的 . 


练习 9 
确定 Mersenne 数 lM) 与 M1 是 否 是 素数 . 


有 人 猜测 ,如 果 半 本 身 是 Mersenne 素数 , 则 MM, 也 一 定 是 Mersenne 素 
数 . 你 是 否 相 入 这 一 猜测 ?还 有 人 相信 IMersenne 素数 有 无 穷 多 个 ,你 的 意见 
呢 ? 


5.2 生成 素数 的 公式 
虽然 我 们 在 $ 2 给 出 了 生成 素数 表 的 算法 ,但 要 找到 大 的 素数 确 是 异常 


的 艰辛 . 你 也 许 会 想 , 要 是 能 找到 一 个 正好 生 威 全 部 素数 的 公式 就 好 了 . 例如 ， 
是 否 存在 单 变量 整 系数 的 多 项 式 , 它 只 生成 素数 并 且 生成 所 有 的 素数 ?更 一 般 
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地 ,是 否 存在 一 个 生成 素数 的 多 变量 函数 公式 ? 如 果 这 样 的 公式 不 存在 ,能 否 
找到 一 个 虽 不 能 给 出 全 部 但 能 给 出 无 穷 多 个 素数 ( 且 只 给 出 素数 ) 的 公式 ? 实 
际 上 , 早 在 十 七 ,十 八 世 纪 , 大 数学 家 Fermat ,Euler 等 就 研究 过 这 类 公式 . 
1640 年 Fermat 在 给 Mersenne 的 信 中 指出 ,对 所 有 的 整数 nx , ,二 2” 十 1 永 
远 是 素数 . 的 确 , fF。 = 二 3 ,二 5,F,==17, 玉 二 257 , FF 一 65 537 都 是 素 
数 . 然而 ,好 事 到 此 为 止 . 1732 年 ,大 数学 家 Euler 指出 , F; 一 4 294 967 297 
不 是 素数 ,他 并 且 找 到 了 F; 的 因子 分 解 . 此 后 ,人 们 分 别 证 明了 Fe ,天 与 FF 
都 是 合 数 ,并 得 到 了 它们 的 素 因 子 分 解 . 实际 上 有 人 和 猜测 下 当 n> 4 时 都 是 合 
数 , 由 此 可 见 ,Fermat 当初 的 猜测 离 真实 结果 相差 有 多 远 . 

Fermat 数 瓦 , 与 正 多 边 形 做 图 有 紧密 的 联系 . 这 一 惊人 的 发 现 是 伟大 的 
德国 数学 家 Gauss 得 到 的 . Gauss 在 19 岁 那 年 证 明了 :一 个 正 n 边 行 可 用 直 
尺 与 圆规 作 图 的 充 费 条 件 是 , 7 一 2 或 者 nn 二 2*pipo…p, ,其 中 pis,pas***, 记 ; 
为 不 同 的 Fermat 数 . 特别 地 , 正 17 边 形 可 汶 用 直 尺 与 圆规 微 出 . 


验证 Fermat 数 开 ， ?所 一 5,6,7,8,9,10 均 为 合 数 ， 


1772 年 Euler 研究 过 用 单 变量 的 整 系数 多 项 式 来 生成 素数 . 其 最 著名 的 
例子 是 苷 十 2 二 41、 


对 二 0,1,1100 ,计算 nn 十 十 41 .它们 是 否 都 给 出 素数 ? 在 10 000 
上 以 内 的 康 数 中 ,由 公式 ni 十 nn 十 41 给 出 的 素数 占 多 少 ? 类 似 地 ,对 公式 
nn? 一 79n 十 1 601 及 6m 十 6n 十 31 做 同样 的 判别 .你 自己 能 否 给 出 一 个 类 似 
的 公式 ? 


公式 7 十 n 十 41 有 一 个 非常 奇特 的 性 质 . 为 揭示 这 一 特性 ,我 们 考察 它 
的 二 次 求 根 公式 的 判别 式 4 = 二 1: 一 4X1X41 二 一 1363. 163 有 什么 特别 
的 地 方 ? 有 ! 请 看 
e* 45 一 262 537 412 640 768 744. 000 000 000 000 
三 个 互 不 相干 的 无 理 数 产生 了 一 个 非常 接近 整数 的 数 ,确实 让 人 吃惊. 你 也 许 
会 想 这 不 是 一 个 巧合 ,幕后 一 定 隐 藏 着 什么 . 你 确 是 猜 对 了 . 它 与 Gauss 关于 
类 数 问 题 的 工作 紧密 相关 . 实际 上 ,4 = 163 是 使 < 十 b VY 一 4 (其 中 4,6 都 是 
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整数 ?这样 的 数 系 具有 唯一 因子 分 解 的 最 大 的 4 值 . 


你 认 为 是 和 否 存 在 单 变 可 的 整 系数 多 项 式 fl(n) ,使 得 对 每 个 n ,fC(n) 都 是 
素数 ? 你 能 和 证 明 尿 的 结论 ? 


从 上 面 的 努力 似乎 可 以 看 出 , 利 骨 单 变量 函数 礁 以 得 到 素数 的 生成 公式 . 
那么 ,多 变量 函数 是 否 可 行 呢 ? 作为 Hilbert 第 十 问题 的 一 个 推论 , 马 蒂 雅 舍 
维 奇 证 明了 :存在 一 个 多 元 多 项 式 P(xi,zxs，,… ,zx,) ,其 正 值 构成 的 集合 恰好 
是 紊 数 的 全 体 . 遗憾 的 是 ,他 并 没有 给 出 怎样 具体 地 构造 这 样 的 多 项 式 . 后 经 
众多 数学 家 的 努力 ,终于 存 1977 年 构造 出 了 一 个 具有 26 个 变量 25 次 的 京 数 
生成 多 项 式 ! 


5.3 素数 的 分 布 


如 果 你 将 素数 在 数 轴 标 出 来 ,你 会 发 现 素 数 的 分 布 很 不 规则 , 让 我 们 通过 
以 下 实验 做 进一步 的 观察 . 


练习 14 


用 XA(n) 表示 不 超过 nn 的 素数 的 个 数 , TCm,n) 表示 区 间 [m,nj] 内 素数 的 
个 教 . 试 计算 zx(100)，x(1 000)，(10 000) ,x《100 000) 以 及 zr(100,200)， 
x(1 000,1100) ,x(10 000,10 100》, r(100 000,100 100) .从 计算 结果 看 , 随 
着 整数 范围 的 扩大 ,素数 是 越 来 越 稀 还 是 越 来 越 密 ? 选取 一 些 更 长 的 区 闻 ， 再 
尝试 以 上 同样 的 实验 、 


将 素数 从 小 到 大 顺序 排列 Pi 二 2,ps 一 3,*… ,用 dd 二 prtl 一 表示 相 邻 
素数 间 的 间隔 .计算 人 assdv 《和 如 入 二 1 000,10 000 等 ), 然 后 将 点 
(psd,) 标 在 平面 坐标 系 中 . 你 能 从 中 观察 到 素数 的 间隔 有 什么 规律 吗 ? 辟 
如 ,素数 的 间隔 慎 有 哪些 ? 它们 各 重复 多 少 次 ? 哪些 间隔 慎 的 重复 次 数 多 ? 最 
大 间隔 值 是 多 少 ? 随 N 增 大 ,里 大 间隔 值 是 否 也 随 之 增 大 ? 


5.3 素数 的 分 布 45 


根据 上 述 实 验 , 你 对 素数 的 分 布 能 做 什么 样 的 猜测 ? 党 如 ,间隔 差 为 2 的 
素数 是 否 有 无 穷 多 个 ? 更 一 般 地 ,间隔 差 为 某 个 偶数 的 素 教 对 是 否 有 无 穷 多 
个 ? 是 否 存 在 相 邻 的 素数 ,其 间隔 值 可 以 任意 大 ? 你 能 否 证 明 你 的 这 些 猜 测 ? 


从 上 而 的 实验 了 解 到 ,素数 的 分 布 是 极 不 规则 的 . 它 虽 然 延 数 轴 分 布 越 来 
越 稀疏 ,但 有 时 素数 之 问 的 间隔 又 很 小 . 不 过 ,就 总 的 趋势 而 言 ,固定 区 间 长 度 
内 的 紊 数 的 个 数 是 越 来 越 少 . 下 面 , 我 们 进一步 研究 素数 个 数 的 变化 规律 . 


在 二 维 坐 标 平面 上 秆 出 点 列 (ar(na))，7 一 1:2,…，NV( 取 不 同 的 从 ,如 
1 000 , 10 000 等 ). 也 可 以 用 折线 将 点 列 连接 起 来 .观察 Tr(n) 趋 于 无 穷 的 趋 
势 ,将 它 同 一 zx，y 一 VT 比较 .你 能 得 出 什么 结论 ? 类 似 地 观察 点 列 
人 za)Aa)， (ar Vn) 及 (orn(nX(n)/(nf/log(n)) .你 能 据 此 猜测 
XCn) 趋 于 无 穷 的 极限 阶 吗 ? 
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令 
Lil(n) = td 
1 (log n)* 
R(n) 二 1 十 rp 
之 keEC(R 二 1) &! 
其 中 


fb 二 1 十 六 十 部 十" 


试 对 一 系列 充分 大 的 nn ,计算 rn) ,njlog(n) ,nf/(log(n) 一 1.083 66) ， 
Lilmn) 及 RCn) ,其 中 哪 一 个 公式 更 接 近 zr(n) ? 


关于 素数 个 数 的 近似 公式 首先 是 Gauss 于 1792 年 给 出 的 ,但 他 当时 没 能 
给 出 证 明 . 直至 1896 才 由 Hadamard 与 Poussin 利用 复 变 函数 的 理论 加 以 证 
明 , 一 个 更 加 精确 的 近似 公式 是 1859 年 由 Riemann 提出 的 一 个 著名 的 猜想 
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( 即 所 谓 的 Riemann 猜想 ?所 导出 的 . 不 过 ,Riemann 猜想 至 今 仍 未 被 证 明 , 它 
无 疑 是 数学 上 最 著名 的 难题 之 一 . 


5.4 进一步 的 问题 


关于 素数 ,存在 许 许多 多 富 于 挑战 性 的 问题 ,吸引 了 众多 的 数学 家 及 业余 
爱好 者 .下面 我 们 介绍 几 个 供 有 兴趣 的 读者 参阅 . 


1. Goldbach 狂想 

Goldbach 是 普鲁士 派 往 俄罗斯 的 一 位 公使 ,彼得 堡 科学 院 院士 . 1742 年 
他 给 大 数学 家 Euler 的 信 中 提出 了 两 个 猜想 , 即 每 个 不 小 于 6 的 偶数 都 可 以 
表 为 两 个 奇 素数 之 和 ;每 个 不 小 于 9 的 奇数 可 以 表 为 三 个 奇 素数 之 和 . Euler 
在 随后 的 复 信 中 写 道 :任何 不 小 于 6 的 偶数 都 是 两 个 坷 泰 数 之 和 ,虽然 我 不 能 
证 明 它 , 但 我 确信 无 疑 这 是 完全 正确 的 定理 , 这 就 是 著名 的 Goldbach 猜想 的 
由 来 . 两 百 多 年 来 ,无数 数学 家 花费 了 无 数 心 血 都 未 能 解决 这 一 问题 . 我 国 数 
学 家 陈景润 的 工作 是 迄今 为 止 最 好 的 结果 . 他 证 明了 :任何 一 个 充分 大 的 偶数 
可 以 表 为 一 个 素数 与 男 两 个 素数 续 积 之 种 . 请 读者 对 10 000 以 内 的 侦 数 验证 
Goldhach 猜想 . 


2. 大 整数 的 索 因 子 分 解 

正如 判断 一 个 大 数 的 素性 一 样 ,将 一 个 大 整数 分 解 为 素 因 子 的 乘积 是 一 
件 相当 艰难 的 事情 ,迄今 尚 无 一 种 通用 有 效 的 方法 . 目前 ,最 有 效 的 素 因 子 分 
解 算法 的 运算 量 大 约 为 Olexp (cLi log(L)””)) ,其 中 工 为 要 分 解 的 整数 六 
的 位 数 . 利用 现 有 大 型 计算 机 的 能 力 , 能 够 分 解 的 最 大 整数 不 能 超过 100 位 . 
例如 ,至 今 沿 无 人 能 分 解 Fermat 数 F。 .读者 能 否 给 出 Fs 的 分 解 ? 

1994 年 ,美国 数学 家 PeterShor 做 出 了 一 项 饼 人 的 工作 . 他 指出 ,如 果 使 
用 量子 计算 机 , 则 因子 分 解 算法 的 运算 量 仅 为 OC(L*log (L)loglog (LZ)). 


3. 完全 数 

所 谓 完 全 数 是 指 它 的 所 有 因子 (除去 它 本 身 ) 之 和 等 于 该 完全 数 . 例如 ， 
6 是 一 个 完全 数 . 因为 6 的 因子 为 1,2,3 且 1 十 2 十 3 一 6. 下 一 个 完全 数 是 
28. 请 读者 找 出 10 000 以 内 的 所 有 完全 数 ,并 对 它 做 素 因 子 分 解 . 你 能 据 此 猜 
测 完 全 数 的 通 式 吗 ? 完全 数 与 Mersenne 素数 有 何 联系 ? 你 能 由 此 找到 更 多 的 
完全 数 吗 ? 是 否 存在 奇 完全 数 ? 完全 数 是否 有 无 穷 多 个 ? 
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除 6 以 外 ,完全 数 都 有 一 个 奇妙 的 特性 ,就 是 每 个 完全 数 可 以 表 为 几 个 连 
续 奇 数 的 奇 次 数 次 方 之 和 . 如 28 = 1 十 33. 请 你 对 你 找 出 的 完全 数 验证 此 特 
性 ， 


4. 李 生 率 数 
所 谓 挛 生 素数 是 指 差 为 2 的 两 相 邻 素数 . 挛 生 素数 是 否 有 无 穷 多 个 ? 


5. Bertrang 猜测 
当 靖 盖 3 时 ,zz 与 2 一 2 之 间 至 少 存在 一 个 素数 ， 


6. 青 一 色 数 的 素性 


由 个 1 组 成 的 数 11…1 叫做 青 一 色 数 . 当 为 何 值 时 , 青 一 色 数 是 素 
数 ? 如 果 青 一 色 数 是 合 数 ,如 何 将 它 做 素 因 子 分 解 ? 


附录 Mathematica 程序 
以 下 是 本 实验 中 需要 采用 的 Mathematica 程序 ， 
1. 计 算 NN, = pi1p2…ps 十 1 ,并 判断 NN, 是 否 素数 
NumP[n_Integer] : 一 
Module[ fi,Num } ， 
Num = Product[Prime[i]j, {i,1,n}] 十 1; 
Print[Num ]; 
Print[PrimeQ[Num | |; 
Print[FactorInteger[ Num |] 
中 


DoLNumP[La]， {n,1 ,20}] 


2. 用 逢 法 求 所 有 小 于 等 于 的 素数 
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Sieve[n_ Integer | : 一 
Module[ 
t= {},i,temp}, 
For[i = 2,i <= n,i 二 +,AppendTo[t,i]]; 
For[i = 1,Prime[i] <= Sqrt[m],i 十 十 ,temp = Prime[i]; 
t = Select[t, (#1 == temp||Mogd[#1,temp]! = 0)8.]]; 
tj 


3. 用 试 除法 求 所 有 小 于 等 于 x 的 素数 


DivPrime[Ln_Integerj : 一 
Module[ 
it = {},i,j,temp ,divided}, 
For[i = 2,i < 二 ny 十 十 ， 
j= l;divided = False; 
WhileLPrimeLj] <= Sgrt[i jb. 1divided), 
temp = 了 rime[j |; 
divided 一 (Mod[i,temp] == 0);j = j++ 1j:; 
If[!idivided,AppendTo[t,i]] 
]; 
tj 


4. PowerMod[a,b,n] 表 示 被 ”整除 所 得 的 余数 


5. Mersenne 数 素 性 的 判别 


MersenneLn_Integer] : = 


Module[ 
{Mi,u 一 4)}， 
If[!:PrimeQ[n |,False, 
M=2 nn—1; 
ForDi 一 1j<n 一 1 十 十 ,一 Mod[u -2 一 2,M]]; 
Iffu 一 一 和 ,True,False]] 


] 
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6. PrimePi[nj 给 出 所 有 小 于 等 于 的 素数 的 个 数 
7. 练习 18 的 程序 


Compare[n_Integer |] : 一 
Module[ {x,k,t = {}}, 
Li = NIntegrate[ 1/Log[E,x], {x,2,n}]; 
R=1+NSum[ t/k/Zetafk + 1 * 工 og[E,nm] k/Factorialfk |], 
{k,2,Infinity) ]; 

AppendTo[t,PrimePi[n |]; 
AppendTo[t,N[n/Log[E,n]]]; 
AppendTo[t,N[n/(Log[E,n] 一 1.08366)]]; 
AppendTof[t,Li]; 
AppendTo[t,R |; 
Print[t] 
J 


Do[Compare[i], {i, 100000,900000,100000}]J 
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实验 六 概 率 


概率 ,又 称 或 然 率 ,几率 ,是 反映 某 种 事件 发 生 的 可 能 特大 小 的 一 种 数量 
指标 . 它 介 于 0 与 1 之 间 . 例如 在 相同 条 件 下 独立 地 多 次 抛掷 一 枚 硬币 , 则 有 
接近 一 半 的 次 数 会 出 现 国徽 朝 上 ,我 们 就 称 在 抛掷 硬币 的 试验 中 ,国徽 朝 上 这 
个 事件 发 生 的 概率 为 0. 5, 概率 的 理论 本 来 就 是 对 随机 的 实验 现象 的 描述 . 本 
实验 的 主要 上 利 的 是 通过 观察 和 分 析 实 验 结果 来 对 概率 及 随机 变量 的 概念 和 知 
识 增加 了 解 和 加 深 理 解 . 


6.1 概率 的 古典 定义 


我 们 考察 抛掷 如 子 这 样 一 个 试验 ,如 果 要 你 回答 在 一 次 抛掷 中 出 现 一 点 
这 样 一 个 事件 的 概率 为 多 少 , 大 多 数 人 都 会 回答 大 约 是 六 分 之 一 . 这 是 因为 我 
们 找 不 出 理由 认为 出 现 一 点 这 个 事件 比 出 现 其 它 情况 更 容易 发 生 或 更 不 容易 
发 生 , 而 在 一 次 掷 股 子 的 试验 中 共 会 上 出现 六 种 结果 ,我们 认为 每 种 结果 出 现 的 
可 能 性 相同 ,从 而 得 到 出 现 一 点 这 个 事件 发 生 的 概率 为 六 分 之 一 . 

在 “等 可 能 性 ”概念 的 基础 上 ,很 白 然 地 引进 古典 概率 的 定义 . 

定义 1 假设 某 一 试验 满足 下 面 的 条 件 : 

(1) 它 的 全 部 可 能 结果 只 有 有 限 个 , 设 此 数 为 NN 如 在 掷 骨 子 的 试验 中 
N = 6 ,在 抛 硬币 的 试验 中 必 = 二 2 等 ). 

(2) 每 个 结果 等 可 能 出 现 . 

则 一 个 恰好 包含 邮 个 结果 的 事件 A (如 在 毛 骨 子 的 试验 中 ,A 为 出 现 偶 
数 点 的 事件 , 则 M = 3 ) 的 概率 定义 为 ;: 

M 


P(A) = Ny 


现在 我 们 用 一 个 例子 来 说 明 如 何 利用 这 个 定义 来 解决 问题 . 

例 1 甲乙 两 位 棋 手 棋艺 相当 . 现 他 们 在 一 项 奖金 为 1 000 元 的 比赛 中 
相 逼 ,比赛 为 五 局 三 胜 制 . 已 经 进行 了 三 局 的 比赛 ,结果 为 甲 二 胜 一 负 . 现 因 故 
要 停止 比赛 , 问 应 该 如 何 分 配 这 1 000 元 比赛 奖金 才 算 公 平 ? 

平均 分 对 甲 欠 公平 ,全 归 甲 则 对 乙 欠 公平 . 合理 的 分 法 是 按 一 定 的 比例 分 
配 而 甲 拿 大 头 .一 种 看 来 合理 的 分 法 是 按 已 胜局 数 分 , 邮 甲 拿 2/3, 乙 拿 1/3. 这 
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种 分 法 合理 吗 ? 


在 甲 已 经 两 胜 一 负 的 基础 上 ,在 计算 机 上 模拟 两 位 棋 手 以 后 的 比赛 ,计算 
他 们 应 得 的 奖金 . 由 于 两 位 突 手 的 模 艺 相当 ,可 以 假定 他 们 在 以 下 每 一 局 的 比 
赛 中 胜 负 的 机 会 各 半 . Mathematica 中 有 产生 0 或 1 随机 数 的 函数 
“Random[Integer]”. 用 这 个 函数 可 以 产生 随机 数 0 或 1,0 和 与 1 出 现 的 机 会 各 
占 一 半 . 可 以 用 随机 数 ] 表示 甲 棋 手 胜 ,而 随机 数 0 表示 乙 胜 . (也 可 以 用 
[0,1] 中 的 随 宙 实数 来 模拟 两 人 的 胜 负 ,随机 数 闭 0.5 表示 甲 胜 ,否则 乙 胜 . ) 
连续 模拟 1 000 次 {或 更 多 的 次 数 ), 每 次 模 氛 到 甲乙 两 方 有 一 方 胜 了 三 局 为 
止 , 按 所 说 方案 分 配 奖 金 .1 000 次 模拟 结束 后 ,计算 两 棋 手 每 次 的 平均 奖金 ， 
就 是 该 左手 应 得 的 奖金 ， 


模拟 结果 ,发现 并 非 甲 得 2/3, 乙 得 173. 

实际 上 ,因为 比赛 只 需 再 进行 两 局 , 则 可 分 出 胜 负 ,结果 无 非 是 以 下 四 种 
人 情况 之 一 : 

申 甲 , 甲乙 , 乙 甲 , 乙 乙 

在 这 四 种 情况 中 ,最 后 甲 胜 的 情况 有 三 种 , 乙 胜 的 情况 只 有 一 种 ,而 每 种 傅 况 
发 生 的 可 能 性 是 一 样 的 ,所 以 甲 最 终 得 到 1 000 元 奖金 的 可 能 性 是 3/4 ,而 乙 
最 终 得 到 1 000 元 奖金 的 可 能 性 是 1/4. 所 以 合理 的 分 法 是 , 甲 得 750 元 , 乙 得 
250 元 . 

这 个 例子 颇 给 人 以 启发 , 即 表面 上 看 来 简单 自然 的 东西 ,经 过 深 人 的 分 析 
后 揭示 了 其 不 合理 之 处 . 

古典 概率 的 局 限 性 是 显然 的 , 它 只 能 用 于 全 部 试验 结果 为 有 限 , 且 等 可 能 
性 成 立 的 情形 . 但 在 某 些 人 情况 下 ,这 个 概念 可 以 推广 到 试验 结果 有 无 限 个 的 情 
形 , 这 就 是 所 谓 的 “几何 概率 ”. 我 们 以 一 个 例子 来 说 明 . 

例 2 在 平面 上 的 区 域 [ 一 1,1] Xx [一 1,1j 中 随意 的 选取 一 点 , 问 “ 选 取 
的 点 落 在 单位 圆 内 ”这 个 事件 4 的 概率 是 多 少 ? 

平面 上 的 正方 形 [ 一 1,1j] X[ 一 1, 志 中 的 每 一 点 (x,y) 都 是 一 个 可 能 的 
试验 结果 ,而 这 个 正方 形 就 是 全 部 可 能 的 结果 之 集 ,“ 在 平面 上 的 区 域 
[一 1,1] X [一 1,1] 中 随意 的 选取 一 点 ”一 语 , 可 以 理解 为 这 正方 形 内 任 一 
点 都 是 等 可 能 的 . 按 约定 ,只 有 在 点 (r+,y) 落 在 单位 阅 内 时 ,事件 4 才 发 生 . 
因 正 方形 内 包 售 无 限 个 点 ,古典 概率 定义 无 法 使 用 . 于 是 ,我 们 把 “等 可 能 性 ” 
这 概念 按 本 问题 的 特点 引申 一 下 :正方 形 内 同样 的 面积 有 同样 的 概率 . 全 正方 
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形 的 面积 为 2 X 2 二 4, 而 单位 阐 的 面积 为 x. 按 上 述 引 申 了 的 原则 ,算出 事 
件 4 的 概率 P(A4) 一 n/4. 

这 样 算出 的 概率 被 称 为 "几何 概率 ”, 是 因为 它 是 基于 几何 图 形 的 面积 , 体 
积 ,长 度 等 而 算出 来 的 , 就 本 例 而 言 ,重要 之 点 在 于 将 等 可 能 性 解释 或 引申 为 
“等 面积 ,等 概率 ” 


(1) 在 计算 机 上 列举 出 同时 挑 抑 三 颗 发 子 的 所 有 可 能 结果 ,比较 在 一 次 试 
验 中 拖 出 的 点 教 和 为 9 与 和 为 10 这 两 个 事件 何者 更 容易 发 生 . 

《2) 利 用 概率 的 吉 典 定义 计算 在 挑 搬 一 对 股子 的 试验 中 , 那 一 种 点 数 和 出 
现 的 概率 最 大 ? 那 一 种 点 数 和 出 现 的 概率 最 小 ? 

(3) 试 计算 下 列 两 个 事件 的 概率 ,并 比较 他 们 的 大 小 . 

i) 毛 4 次 表 子 ,至 少 有 一 次 出 现 一 点 . 

二) 措 据 一 对 才子 24 次 ,至 少 有 一 次 出 现 两 个 一 点 . 

从 这 个 练习 中 体能 得 到 一 些 什 么 ? 

(4) 试 计算 实验 二 的 薄 半 (Buflon) 随 机 斤 针 实验 中 针 与 线 相 交 的 概率 ( 提 
示 :考虑 针 的 中 点 与 最 近邻 直线 的 距离 Y 和 针 与 直线 的 夹 角 yy ). 

(5) 在 单位 国内 随意 地 取 一 条 弦 , 问 " 弦 长 超过 该 团 内 接 等 边 三 角形 的 边 
长 V 3 ”这 一 事件 的 概率 是 多 少 ? 


6.2 概率 的 统计 定义 


我 们 仍 以 抛掷 山 于 为 例 ,在 定义 古典 概率 时 ,我们 假设 各 面 出 现 的 机 会 是 
等 可 能 的 ,这 就 要 假设 

《1) 仍 于 的 质料 绝对 均匀 - 

《2) 仙 于 是 绝对 的 正六 而 体 . 

《3) 掷 仍 子 时 离 地 面 有 充分 的 高 度 . 

但 在 实际 问题 中 是 不 可 能 达到 这 些 要 求 的 . 这 时 "出现 一 点 ”这 个 事件 
4 的 概率 有 多 大 ,已 无 法 仅 通过 一 种 理论 的 考虑 来 确定 . 但 我 们 可 以 通过 试 
验 的 方法 来 得 到 事件 4, 的 概率 : 设 反 复 地 将 山 于 抛掷 大 量 的 次 数 , 例 如 次， 
若 在 这 ”次 抛 拖 中 一 点 共 发 生 了 mm 次 , 则 称 和 yn 是 4 这 个 事件 在 这 次 试 
验 ( 每 抛掷 一 次 算 作 一 次 试验 ?中 的 频率 ,概率 的 统计 定义 就 是 将 my2 作为 事 
件 4; 的 概率 P(A1) 的 估计 . 
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这 个 概念 的 直观 背景 很 简单 : 当 一 个 事件 发 生 的 可 能 性 大 (小 ) 时 ,如 果 在 
同样 条 件 下 反复 重复 这 个 实验 时 , 则 该 事件 发 生 的 频繁 程度 就 大 (小 ). 

现在 要 问 的 问题 是 :对 任何 “组 试验 ,频率 是 否 相 同 ? 我 们 说 :虽然 对 任何 
一 组 试验 ,频率 不 会 恒 等 于 同一 个 数 ,但 我 们 在 数学 上 可 以 证 明 : 对 几乎 任何 
一 组 试验 , 当 趋向 无 穷 时 ,频率 mx,/n 趋向 同一 个 数 . 

虽然 我 们 不 能 用 概率 的 统计 定义 来 确切 地 定 出 任何 一 个 事件 的 概率 ,但 
我 们 可 以 用 概率 的 统计 定义 对 一 个 事件 的 概率 做 出 估计 ,同时 也 可 以 利用 概 
率 的 统计 定义 对 某 些 理论 的 正确 与 否 进行 检验 . 设想 根据 一 定 的 理论 .假定 等 
等 算出 某 事件 4 的 概率 为 .这 理论 或 假设 是 否 与 实际 相符 ? 我 们 并 无 把 握 . 
于 是 我 们 可 以 诉 诸 实验 , 即 进行 大 草 重 复 的 试验 以 观察 事件 4 发 生 的 频率 
m/n， 以 m/fn 与 的 接近 程度 来 判断 有 关 理 论 的 正确 与 否 . 对 这 类 问题 的 研 
究 属 于 假设 检验 , 它 是 数理 统计 学 的 一 个 重要 分 支 有 兴趣 的 读者 可 以 参考 有 
关 的 书籍 . 


(1) 设 户 是 区 间 [0,1] 内 任 一 实数 . 在 区 间 [0,1] 取 随 机 数 和 4, 则 2 才 记 
的 概率 应 等 于 记 . 取 n 一 100,1 000,10 000 个 这 样 的 随机 数 1 计算 人 之 户 的 
次 数码， 看 n/m 是 否 接 近 于 户 

(2) 利 用 概 举 的 统计 定义 ,通过 计算 机 模拟 本 实验 练习 2 中 的 (1) 一 (3). 
模拟 的 方法 是 :产生 [0,1) 中 的 一 个 随机 数 4 来 模拟 禄 盯 子 ,以 [641 十 1 作 
为 角子 的 上 点数,( 其 中 [64] 表示 64 的 整数 部 分 ), 或 者 直接 用 Mathematica 的 
随机 函数 Random[lnteger,{1,6} ] 来 模拟 产生 1 到 6 的 随机 数 作为 狠 子 的 点 
数 . 分 别 让 计算 机 按照 练习 2 的 (1),(2),(3)? 的 要 求 “ 掷 规 子 ” 并 计算 所 得 的 结 
果 ,进行 分 析 , 回答 所 提 的 问题 ， 

从 模拟 中 你 能 得 到 什么 结论 ? 

(3) 利 用 例 2 给 出 的 结果 与 概率 的 统计 定义 ,通过 计算 机 模 氛 (分别 取 n 一 
100,200,500, 000,2 000,5 000, 各 做 100 次 ) 对 不 的 值 做 出 估计 ,通过 分 析 
它们 的 误差 ,你 能 得 到 什么 结论 ? 

(4) 用 计算 机 进行 下 面 的 模拟 : 

Q) 在 线段 [0,1j 中 随机 地 取 一 点 (中 产生 区 间 [0,1] 内 的 一 个 随机 数 )， 
共 取 nn 次 (nn 分别 取 100,500,1 000,5 000). 

(ii 将 线段 L0,1j 分 成 甘 个 互 不 相交 但 长 度 相 等 的 线段 ,而 后 计算 各 小 线 
段 中 含有 (1i) 中 取出 的 点 的 个 数 ， 

(ii) 计 算 小 线段 中 伟 有 点 数 愉 好 为 上 ( 刻 取 为 0,1,2,3,4,5) 的 频率 . 
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分 析 最 后 的 结果 . 


注 :我 们 在 这 里 只 能 介绍 概率 的 这 两 种 定义 ,关于 现代 概率 的 公理 化 定义 
已 经 超出 了 本 书 的 范围 ,有 兴趣 的 读者 可 以 参考 概率 论 方面 的 书籍 . 


6.3 ”二 项 分 布 与 Poisson 分 布 


在 讲 分 布 的 概念 之 前 ,我 们 先 介绍 一 下 随机 变 景 的 概念 . 随机 变量 就 是 
“其 值 随机 会 而 定 "的 变量 , 例如 在 挪 角 子 的 试验 中 ,如 果 设 毛 出 的 点 数 为 ， 
则 X 就 是 一 个 随机 变量 , 它 可 以 取 1,…,6 等 6 个 值 ,具体 取 什么 值 ,要 等 部 了 
般 于 后 才能 知道 . 那么 ,对 于 一 个 随机 变量 X , 它 取 一 个 值 x (此 值 在 可 能 的 
取 值 范围 内 ) 就 对 应 于 某 个 事件 , 对 于 此 事件 就 有 一 个 概率 值 p(z), 它 是 x 
的 一 个 函数 ,我 们 称 它 为 随机 变量 X 的 概率 分 布 . 

考虑 如 下 问题 ， 

. 将 一 枚 硬币 拉 接 5 次 ,恰好 等 到 2 次 国徽 朝 上 的 概率 是 多 少 ? 

, 抽 掷 一 果盘 子 9 次 ,恰好 等 到 4 个 2 点 的 概率 是 多 少 ? 

. 一 个 盒子 中 装 有 2 个 红 球 和 3 个 白 球 ,有 放 回 的 随机 抽取 6 次 ,恰好 有 
2 次 取 到 红 球 的 的 概率 是 多 少 ? 

略 加 分 析 即 知 ,上 面 的 几 个 问题 都 是 下 面 这 个 问题 的 特例 . 

, 设 某 事件 4 在 一 次 试验 中 发 生 的 概率 为 p . 现 把 这 个 试验 独立 地 重复 
"次 ,以 X 记 A 在 这 次 试验 中 发 生 的 次 数 , 求 X 怡 好 为 上 的 概率 . 

设 我 们 对 次 试验 结果 都 做 记录 , 某 次 试验 中 如 事件 4 发生, 则 记 为 4 ， 
如 事件 4 不 发 生 , 则 记 为 万 .要 想 X 正 寻 等 子 ,必须 在 这 次 试验 的 原始 记 
录 

4444…444 
中 ,有 上 个 4 ,，n 一 个 万 ,每 个 44 有 概率 而 每 个 万 有 概率 1 一 p. 又 这 > 
次 试验 独立 ,所 以 每 个 这 样 的 原始 记录 序列 出 现 的 概率 是 p*(1 一 p)"”“. 这 
样 的 序列 共有 | “| 个 .所 以 X 恰好 为 的 概率 
(wa 

如 果 随 机 变量 X 的 概率 分 布 具有 以 上 形式 , 则 称 X 服从 具有 参数 (2) 
的 二 项 分 布 . 记 为 X ~ B(n,p) ， 

现在 ,我 们 可 以 很 容易 的 算出 我 们 要 求 的 三 个 概率 值 分 别 为 亩 (n= 5， 
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二 9,k=4, 思 一 讲 | 和 -n= 6,k 二 2， 
p= 0.4). 


计算 机 宰 拟 本 节 开 始 提 出 的 三 个 问题 .其 中 抛 硬币 可 以 用 0 一 1 随机 数 来 
模 裤 ; 毛 虎 子 可 以 用 1 到 6 的 随机 整数 来 模拟 ; 模 球 可 以 用 1 到 5 的 随机 整数 
来 模拟 ,以 1,2 为 红 球 ,3,4,5 为 白 球 , 袖 硬 币 5 次 作为 一 次 实验 , 共 作 nn 次 这 
样 的 实验 ,( 比 如 取 有 二 1000), 看 5 个 0-1 随 机 数 中 恰好 出 现 两 次 1 的 频率 
是 多 少 ,是 否 与 理论 值 接 近 ? 其 余 两 个 问题 也 作 类 似 模 氛 . 


我 们 现在 利用 二 项 分 布 来 导出 另 一 重 蓝 的 分 布 :Poisson 分 布 . 

考虑 在 一 定时 间 内 某 交 通路 口 所 发 生 的 事故 个 数 并 , 求 耻 恰好 为 的 概 
率 .为 方便 计 , 设 所 观察 的 这 段 时 间 为 [0,1). 取 一 个 很 大 的 自然 数 =” ,把 时 间 
段 [0,1) 分 为 等 长 的 = 段 : 


1 1 2 

也 一 3 ;72 一 [二 
现 作 如 下 的 假定 : 

1° 在 每 段 了 内 , 恰 发 生 一 次 事故 的 概率 ,近似 地 于 这 段 时 间 的 长 度 成 正 


比 , 即 可 取 为 人 . 又 假定 在 ”很 大 因而 二 很 小 时 ,在 1; 这么 短暂 的 时 间 内 , 相 


发 生 两 次 或 两 次 以 上 事故 是 不 可 能 的 . 因此 ,在 7 时段 内 不 发 生 事故 的 概率 


1 
为 1 一 工 . 


2" 了 ，,… ,了 各 段 内 是 否 发 生 事故 是 相互 独立 的 ， 
此 时 ,在 [0,1) 时 自 内 发 生 的 事故 数 筷 就 等 于 在 一个 时 段 忆 ,六 内 有 


事故 的 时 段 数 , 按 上,2 的 假设 , 应 服从 二 项 分 布 B[ *, 亿 | 于 是 ， 


州 一 大 


一 攻 ,| i [ — 1 


niAl* A 

P(x =A) = [| ES 

严格 讲 , 上 式 只 是 一 个 近似 式 ,因为 在 假设 1° 中 ,在 每 个 时 间 段 内 发 生 一 次 事 

故 的 概率 只 是 近似 等 于 人 , 当 n 一 co 时 ,就 得 到 确切 的 答案 . 困 为 当 -> oo 
时 有 


4 


所 以 
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A 
P(X 一 下)》 一 kre 


如 果 一 个 随机 变量 苹 的 概率 分 布 具 有 上 式 的 形式 ,我 们 就 称 开 服从 具有 参数 
4 的 Poisson 分 布 , 记 为 XX 一 了 P(4). 


(1) 利 用 本 节 的 知识 来 解释 本 实验 练习 3(4) 的 结果 . 

(2) 从 本 节 的 推导 我 们 知道 ,如 果 随 机 变量 芒 服 从 二 项 分 布 电 (n,p), 当 
n 很 大 而 声 很 小 时 ,可 以 近似 的 认为 六 服从 Poisson 分 布 Plnp). 如 果 户 不 随 
着 变化 时 ,利用 计算 机 模拟 来 说 明 

i) 对 很 大 的 ,是 否 仍 可 以 近似 的 认为 及 服从 Poisson 分 布 PC(np). 

下》 娄 很 大 时 ， 对 玫 一 20,30,40,50， 分 别 近 候 散 出 


证- VX<np 十 这 Vwn] (其中 了 取 一 切 可 能 的 值 ) 的 图 


天 到 np 十 一 


形 ( 以 做 为 模 坐 标 ), 从 这 四 张 图 中 你 能 看 出 些 什么 ? 
6.4 正 态 分 布 


EE 

设 了 是 在 区 闻 [0,1] 内 均 身 分 布 的 随机 变量 . 让 卫 连 取 刀 个 值 ti,t，…， 
t， 则 这 个 值 的 平均 值 应当 接 近 于 0.5, 它们 的 和 号 一 碳 十 所 十 十 丰 应 
当 接 近 于 0. 5n. 但 真 要 去 做 实验 ,就 会 发 现 S 并 不 真正 等 于 0.5n, 而 是 有 一 
个 偏差 4d = 二 S 一 0. 5n. 

从 区 册 [0,1] 取出 nn 个 随机 数 二 tos ;并 计算 

而 十 红 十 十 一 0. 5 

四 V 
这 称 为 一 次 实验 ,得 到 的 碟 称 为 这 次 实验 的 结果 , 我 们 来 看 随机 变量 环 的 分 
布 .做 入 次 实验 ,将 所 得 的 结果 称 为 和 ,和 ww 可 以 预计 到 蕊 在 0 附近 
摆动 , 离 0 越 近 的 XX, 越 多 , 离 0 越 远 的 六, 越 少 , 取 一 个 短 的 区 间 长 9 .对 每 个 


正 实 教工 ,计算 出 落 在 区 间 [z 一 全 ,十 号 内 的 XK, 的 个 雪 N， ,以 守 作为 
随机 交 量 存在 点 工 的 报 率 密度 f(z). (当然 应 当 取 工 离 0 不 坟 远 ,否则 f(x) 


.4 
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可 能 等 于 0. 
取 和 足够 大 ,( 比 如 于 一 100 或 更 大 ,人 必 一 1000,10 000 等 ), 计 算出 
足够 多 的 f(z) ,在 坐标 系 中 部 出 所 得 的 数据 点 (7,f(X))， 连 成 光滑 曲线 . 观 
上 
察 它 好 象 是 什么 函数 的 曲线 ? 令 o 二 [ 》)X?} AN .将 函数 
+ 一 1 
3 
V2na 
的 图 像 与 f(x) 的 图 像 画 在 同一 坐标 系 中 ,观察 两 个 曲线 是 否 响 合 ， 
增 大 天 或 者 减 小 ma， 看 曲线 有 什么 变化 ?实验 站 果 有 件 么 变化 ? 


g(x) 一 


如 果 连 续 型 随机 变量 X 的 概率 密度 函数 具有 形式 


1 _ {rp 
多 了 )》 一 一 一 一 人 3 
2nd 1 


则 XX 的 分 布 称 正 态 分 布 . 正 态 分 布 是 非常 重要 的 分 布 . 其 中 的 常数 上 ,ca 分别 
是 随机 变量 X 的 均值 和 标准 差 . 
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在 现实 中 ,我 们 经 常会 看 到 这 样 一 种 现象 .有 人 在 一 段 时 间 里 的 运气 连续 
的 很 好 ,而 在 另 一 段 时 间 里 又 连续 的 不 好 . 我 们 将 这 样 一 个 问题 简化 为 : 某 人 
多 次 的 抛掷 一 枚 硬币 ,如 出 现 国徽 朝 上 的 话 就 给 他 加 一 分 (运气 好 ), 反 之 就 减 
一 分 (运气 不 好 ). 以 a, 记 他 第 ; 次 的 得 分 , 5; 记 他 前 ;次 总 得 分 ,那么 他 运气 
好 ,就 表示 S, 一 直 为 正 ,运气 不 好 表示 一 直 为 负 ( 零 点 按 前 面 是 大 于 零 或 小 于 
零 来 定 ). 如 果 我 们 假设 此 硬币 是 均匀 的 话 , 则 可 能 会 认为 ,5, 大 于 零 和 小 于 
零 的 次 数 各 半 . 

然而 ,这 是 完全 错误 的 ,在 20 000 次 抛掷 中 , 甲 只 领先 一 次 的 可 能 性 比 他 
领先 10 000 次 的 可 能 性 约 大 88 倍 . 不 管 拍 搓 多少 次 ,领先 权 改 变 的 次 数 是 0 
的 可 能 性 最 大 . 而 后 依次 1,2,3, … ,这 是 由 第 一 反正 弦 律 所 导出 的 一 个 
结论 . 

第 一 反正 弦 律 ”对 于 而 定 的 (0 < e < 1) , S; 处 于 正 边 的 总 次 数 与 试验 
总 次 数 之 比 全 小 于 a 的 概率 在 一 co 时 趋 于 

人 dx 
I 
这 个 通 近 在 二 20 时 就 很 好 了 . 


四 1 
一 2x larcsin az 
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利用 计算 机 模拟 第 一 反正 缠 律 所 描述 的 现象 ,验证 其 结论 . 


实验 七 几何 变换 


如 果 有 一 种 法 则 8 ,将 平面 了 上 每 个 点 4 对 应 于 唯一 的 一 个 点 9CA》, 则 
9 称 为 平面 上 的 变换 . pg(A) 称 为 4 的 象 .平面 上 的 图 形 由 点 组 成 , 因 面 平面 上 
每 个 变换 9 将 每 个 图 形 C 变 到 某 个 图 形 gCC). 9LC) 称 为 C 的 象 . 

在 平面 上 建立 了 直角 坐标 系 之 后 ,每 个 点 P 由 它 的 坐标 (z+,y) 来 代表 ， 
其 中 zy 是 一 对 实数 .平面 上 的 变换 史 将 每 个 点 P(x,y) 变 到 点 
KP) (x',y'), CP) 的 横 坐 标 和 纵 坐 标 都 是 zy 的 函数 : 

I = fx), y= frr,y) 
只 要 给 定 了 两 个 函数 和 f ,就 决定 了 一 个 几何 变换 9 , 它 将 坐标 为 (zyy) 
的 点 变 到 坐标 为 《六 (Ty) ,f(x,y)) 的 点 . 
设 平面 曲线 C 的 参数 方程 为 
X=X), y= y(t), t€ETI 
其 中 工 是 函数 x(t) ,y(t) 的 定义 域 . 则 曲线 C 在 变换 9 下 的 象 9CC) 的 参数 方 
程 为 
T= FE YD), y= flrlt) ,y(t)), i:ET 

德国 数学 家 克 莱 茵 (kK. Klein)1872 年 在 德国 爱尔兰 根 大 学 的 一 次 学 术 报 
告 中 提出 ,几何 学 的 任务 就 是 研究 在 一 定 的 几何 变换 (这 些 变换 组 成 一 个 群 ) 
下 图 形 的 不 变性 质 . 比如 , 欧 几 里 德 平 面包 何 学 里 的 变换 是 平面 图 形 的 平移 、 
转动 , 轴 对 称 ,在 这 些 变换 下 ,长 度 、 角 度 保持 不 变 . 克 荣 茵 所 种 述 的 这 一 著名 
观点 被 称 为 爱尔兰 根 纲领 . 

本 实验 的 主要 内 容 是 观察 在 几 种 重要 的 几何 变换 下 图 形 的 变化 情况 ,以 
及 在 这 些 变换 下 图 形 的 哪些 性 质保 持 不 变 . 


7.1 线性 变换 与 仿 射 变换 
设 变 换 9 将 平面 上 所 有 的 点 绕 原点 旋转 a 角 ( 以 道 时 针 方向 为 正 ). 可 以 
这 样 来 求 出 每 个 点 PCz,y) 与 它 的 象 P' (xz' ,y ) 的 坐标 之 间 的 函数 关系 :以 原 


点 为 极点 ,x 轴 正 方向 为 极 轴 建立 极 坐 标 系 . 设 已 点 的 极 坐 标 是 (>,0) , 则 户 ' 
点 的 极 坐 标 为 〈r'*2 十 a) ， 
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工 一 rcCos dt 
y=rsing 
zf =rcos(8 + a) = reos fecos a — rsin Osin a = wcos a ~— ysin a 
y' =rsin(0 + a) 一 rcos gsin gt rsin bcos a = xsin a ycos a 
注意 cos wsin a 都 是 与 x,y 无 关 的 常数 ， 
XT 一 Yepswa 一 ysina 与 y 二 Xxsin a 二 ycosa 
都 是 +,y 的 一 次 齐 次 函数 , 即 线性 函数 . 
一 般 的 ,如 果 变 换 9g; (zy)Fe (zy ) 由 函数 关系 
Xx’ =ar |- by 
y =asrt 二 by 
决定 ,其 中 4a1, 刀 ,azsb4 是 与 +,y 无 关 的 常数 , 则 称 9 为 线性 变换 , 它 也 可 写成 


和 矩阵 形式 

(5)= 2 
由 矩阵 总 二 民 ?| 
决定 ， 


进一步 ,如 果 在 变换 9p 下 每 个 点 (x,y) 的 象 (z ,> ) 的 坐标 二 ,y 都 是 z， 
> 的 一 次 函数 ， 
T=ar 二 by 二 i 
y 一 aa 十 Be? 十 cs 
则 称 8 是 仿 射 变换 . 仿 射 变换 可 以 看 成 是 先 作 一 个 线性 变换 .再 作 一 次 平移 
(zy)Fe(z 十 cy 十 cz) 得 到 的 变换 ， 


练习 1 


(1) 任 选 一 个 角度 a ,决定 一 个 线性 变 找 9: (rz,y) > (Cry )》 使 


7X' 一 zcos a 一 ysin a 


3 一 rsin g++ ycos a 
画 一 个 由 平面 直线 段 或 曲线 段 组 成 的 图 形 C ,再 通 出 它 在 上 述 变 提 下 的 象 
9LC) .观察 9LC) 是 否 是 由 人 经 过 旋转 得 到 的 图 形 . 
起 一 起 ,如果 变换 史 是 关于 某 末 直线 ar 十 569 十 < 一 0 的 孝 对 称 , 则 任 一 点 
(Cry) 的 象 的 坐标 (zy ) 与 X,Y 有 怎样 的 画 数 关系 ? 通过 画图 和 观察 验证 
你 的 结论 是 否 正 确 . 
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Ql 妨 


(2) 自 己 选 取 变 换算 阵 刀 一 | 8 | ,决定 线性 变换 允 ， 
Uz 2 


画 一 条 曲线 或 由 曲线 段 (或 直线 段 ) 组 成 的 图 形 上 .再 画 出 这 个 围 形 经 过 
变 搞 ?作用 之 后 的 围 形 . 比较 变换 前 后 图 形 的 形状 和 位 置 , 着 发 生 了 哪些 谈 
化 ,哪些 性 质保 持 不 变 ? 为 了 便于 观察 图 形 的 变化 情况 ,可 画 若 干 条 平行 于 坐 
标 轴 的 直线 工 一 &,y 一 &( 其 中 不 一 0, 十 了, 士 2,…-), 组 成 正方 形 网 格 ,作为 
图 形 C 的 背景 .再 画 出 这 些 正 方形 网 格 以 及 图 形 人 经 过 变换 9 之 后 的 象 . 观察 
正方 形 爽 格 的 位 置 和 形状 的 变化 情况 ,有 助 于 理解 和 想象 图形 C 的 变化 情 
况 . 

特别 注意 观察 以 下 现象 : 

直线 是 否 仍 变 成 直线 ? 平行 直线 是 否 仍 变 成 平行 直线 ? 平行 四 边 形 是 否 
仍 变 或 平行 四 边 形 ? 

两 点 之 间 的 距离 经 过 变换 是 否 保 持 不 变 ? 如 果 变 化 了 ,是 否 所 有 的 距离 按 
同一 比例 放大 或 缩小 ? 或 者 ,同一 方向 上 的 距离 按 同 一 比例 放大 成 缩小 ? 

角度 大 小 是 否 保 竺 不 变 ? 矩形 是 否 仍 变 成 短 形 ? 

国 变 成 什么 图 形 ? 是 否 仍 变 或 园 ? 

(《 注 ;以 上 问题 都 可 通过 理论 推导 得 出 结论 . 本 实验 课 的 要 求 是 通过 对 图 
形 的 观察 来 得 出 结论 成 验证 这 些 结 论 . 》 

一 般 要 求 变换 瞪 阵 满足 条 件 Bb 一 ai 关 0? 如 果 选 取 算 阵 使 
aipa 一 4z5 一 0 ,看 看 发 生计 么 现象? 


7.2 线性 变换 的 特征 向 量 


选取 一 个 矩阵 4 = 机 . ,决定 线性 变换 
本 二 I i a bilix 
网 a = . a 
平面 上 每 个 点 P(rx,y) 被 变 到 P' (zx' ,y') ,向 量 O 也 就 被 变 到 到 . 试 通过 
画图 来 研究 向 量 的 方向 的 变化 情况 . 看 哪些 向 量 的 方向 经 过 变换 之 后 向 通 时 
针 方 向 偏 移 ,哪些 向 顺 时 针 方 向 偏 移 ,哪些 向 量 的 方向 保持 不 变 ? 
先 对 矩阵 
1 十 所 E2 
及 二 

| E3 二 四 

(el,esvsiys' 是 小 的 正 实数 ) 作 下 面 的 实验 , 再 换 成 别 的 矩阵 作 同 样 的 实验 . 
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2kT 2k7 
n 


选取 自然 数 n. 在 单位 国 周 上 依次 取 郊 个 点 已 | cos ,sin | (0 返 
记 世 n 一 1). 设 也 是 P, 经 灾 找 9 后 的 象 .用 一 种 闫 色 ( 比 如 红色 ) 画 出 从 原点 
OQ 到 每 个 P, 的 线段 并 适当 延长 ,用 另 一 种 普 色 {比如 绿色 或 黑色 ) 务 出 从 每 个 
P, 到 了 P! 的 线段 . 观察 比较 向 醒 吕 下 与 五 芒 方 向 的 差异 . 是 否 有 站 孙 与 万 丙 方 
向 一 致 ? 如 果 有 ,有 几 个 ? 


在 线性 代数 课程 中 可 以 知道 ,如 果 非 零 向 量 w 一 [下 在 线性 变换 9 的 作用 
下 的 象 DPF 一 Au 与 z 的 方向 平行 (方向 相同 或 相反 或 等 于 零 ), 归 
Au = XE : 
对 茶 个 数 4 成立 , 则 w 称 为 p 的 特征 向 量 , 4 称 为 特征 根 或 特征 值 .平面 线性 变 
换 ?的 特征 值 是 一 元 二 次 方程 


的 根 . 


按照 练习 2 所 说 的 方式 在 单位 加 上 取 n 个 点 P. 或 者 在 正方 形 
{Czyy)1 1z| 委 1, |y| 很 1) 内 随机 选取 个 点 P; .将 每 个 志 已 , 经 过 线性 变 
摸 9 作用 后 的 象 弘 PDP,) 记 为 也 . 了 Pn 再 经 过 P 作 用 后 的 象 记 为 Pis. 一般 地 ,将 
也 ,被 8 连续 作用 点 次 之 后 的 象 记 为 Pi。 在 坐标 乎 而 上 酸 出 所 有 这 用 个 点 了 P,(1 
拒 ? 仿 nn) ,以 及 它们 经 过 p 一 次 又 一 次 作用 之 后 的 象 卫 ,,Pio，"… .观察 所 有 适 
些 象 的 变化 趋势 , 随 着 作用 次 数 色 的 增 大 ,所 有 的 点 了 i 是否 趋 于 一 条 直线 ?如 
果 是 ,这 条 直线 就 是 9 的 一 个 特征 向 量 方向 , 它 所 对 应 的 特征 值 是 所 有 特征 值 
中 最 大 的 . 

将 给 阵 生 换 成 4 ' 重 做 上 面 的 实验 ,观察 和 分 析 所 得 的 结果 . 

对 各 种 不 同 的 矩阵 4 进行 实验 ， 


练习 3 提供 了 一 种 计算 特征 向 量 的 方法 , 它 不 仅 适 用 于 平面 ( 即 二 维 空 
间 ) 的 变换 ,而 且 适 用 于 一 般 的 x 维 空间 的 变换 . 每 个 n 阶 方 阵 


Qt Ci Qin 


对 二 
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决定 n 维 空间 的 一 个 线性 变换 2 ,将 每 个 列 向 量 


1 Yi 
村 

三 一 | 映 到 一 | 六 | -4 
In Yr 


为 了 书写 方便 ,我 们 以 后 将 列 向 量 半 写成 (zx,,… ,zx,)" 的 形式 , 它 由 行 向 量 
(rzo) 转 置 而 成 , ,… 依次 是 各 列 的 元 素 . 

从 某 个 给 定 的 非 零 列 向 量 车 一 《xo ,zos，… ,zxo,)7 出 发 ,用 8 不 断 作用 , 依 
次 得 到 


居 ; 一 A 人 在 一 4 下 ， 大 一 A,， -…， X; = AX_)， 


我 们 无 法 像 # 二 2 的 情况 那样 画 出 平面 图 形 来 观察 ;是否 随 着 的 增 大 而 趋 
于 一 个 务 定 的 方向 ,但 我 们 希望 作 数值 计算 验证 是 否 Y; 与 天- 趋 于 成 比例 . 
为 此 ,在 一 开始 先 将 于 = (ze ，… ,Xxon)" 除 以 各 分 量 绝对 值 之 和 co 一 |zo| 十 
|zozl 十 十 |xwm| :化 为 了 o 一 cp 下 一 (yoyo ym) ,其 中 每 个 yo, = 
Co Tw， 从 而 ya 十 | yo 十 … 十 |yon| 一 .这 种 将 向 量 邢 乘 以 常数 ca 化 
为 了 ,使 各 分 量 绝 对 和 值 之 和 为 1 的 过 程 叫 做 归 一 化 . 取 XY = 47。 一 
《zuvzrizyzn) ,再 对 XX 作 归 一 化 得 ¥, == cr' (其 中 0 二 |zw| 十 
[zs| 十 … 十 [x1 ). 照 此 下 去 依次 得 Fo 了 了,… ,了 1, 了 Y,* ,其 中 了 二 
ci 1AY;_， ,ci 等 于 AY,_, 各 分 量 绝对 值 之 和 . 如 果 随 着 二 的 增 大 ,了 1 一 了 的 
所 有 分 量 都 趋 于 0, 即 Y, 趋 于 一 个 固定 的 向 量 Y , 则 AY 一 < 了 对 某 个 常数 < 成 
立 ,Y 是 特征 向 量 ,c 是 4 的 绝对 值 最 大 的 特征 值 . 这 个 求 特征 向 量 的 方法 叫 
做 厦 方 法 . 


选 定 一 个 给 阵 4 ,使 它 的 所 有 的 矩阵 元 素 ar 六 0. 取 初始 向 量 了 一 
(1/n,*…,l/n)' 的 所 有 分 本 相等 ,都 为 1/r. 接 上 述 轮 方法 进行 实验 ,看 
Y,_, 一 二 是 否 随 看 上 的 无 限 增 大 而 趋 于 零 向 量 . 
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7.3 射影 变换 


定义 平面 上 的 变换 Vs:(TyyyFe (x',y ) 使 XZ',y 之 同 的 函数 关系 为 


画 一 条 曲线 或 由 曲线 段 (或 直线 段 ) 组 成 的 图 形 C. 青 画 出 这 个 图 形 经 过 详 换 
9 作用 之 后 的 图 形 . 比较 变换 前 后 图 形 的 形状 和 位 置 ,看 发 生 了 哪些 变化 , 哪 
些 性 质保 持 不 变 . 

特别 注意 观察 : 

直线 是 否 仍 变 成 直线 ? 平行 直线 是 否 仍 灾 成 平行 直线 ? 同一 方向 上 的 路 
离 是否 按 同一 比 侈 放大 或 缩小 ? 

直线 工 二 1 上 的 点 没有 象 . 当 点 卫 从 直线 二 1 之 外 接近 这 亲 直 线 时 , 它 
的 参 LP) 的 变化 怎样 ? 

在 直线 x 二 1 上 任 取 一 点 一 ,过 PP 作 若 干 条 不 同方 向 的 直线 ,观察 这 些 
直线 在 变 撞 名 下 的 象 , 它 们 是 否 仍 是 相交 直线 ? 如 果 是 ,相交 于 何 处 ? 

以 原点 为 国 心 作 若 千 个 加 ,它们 的 半径 有 的 小 于 1, 有 一 个 等 于 1, 有 的 大 
于 1. 观察 这 些 同心 加 被 变 成 什么 图 形 . 


练习 5 中 的 变换 不 是 仿 射 变换 ,而 是 射影 变换 的 一 个 例子 . 一般 的 , 设 实 
系数 矩阵 
Ql Be 


azs Bb: ca 


as b3 ca 


的 行列 式 不 等 于 0. 定义 于 面 上 的 将 坐标 为 《x,y) 的 点 已 变 到 坐标 为 (z ,7 》 
的 点 P' 的 变换 9 ,使 x',y' 与 +,y 之 间 有 阻 数 关系 
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QT 十 by 十 局 
YY Tartby te 
1 _asT 二 boy 十 cs 
> ea 十 Bay 十 Cs 
则 gp 称 为 射影 变换 . 如 果 a; 二 5 一 0 ,cs 隆 0 , 则 射影 变换 是 一 个 仿 射 变换 . 可 
见 , 仿 射 变换 是 射影 变换 的 特例 . 
想象 平面 图 形 C 是 画 在 一 块 玻璃 板 上 ,用 一 个 点 光源 将 玻璃 板 上 的 图 形 
C 投影 到 男 一 个 平面 上 得 到 图 形 C' .在 玻璃 板 和 被 投影 的 平面 上 分 别 建立 坐 
标 系 , 则 从 C 到 C 的 变换 就 是 射影 变换 . 一 个 接 一 个 施行 若干 个 这 种 投影 ,总 
的 效果 仍然 是 射影 变换 . 
另外 选择 一 个 射影 变换 , 重 作 练 习 5. 


7.4 非 欧 几何 


欧 几 里 得 几何 的 一 个 重要 的 公理 是 平行 公理 :在 平面 上 ,过 任 一 条 直线 ! 
外 一 点 卫 能 县 只 能 作 一 条 直线 与 不 相交 . 

将 这 一 公理 加 以 改变 , 即 引 和 这样 的 公理 :在 平面 上 ,过 任 一 条 直线 外 
一 点 卫 至 少 可 以 作 两 条 不 同 的 直线 与 ! 不 相交 .这样 就 可 以 得 到 一 种 非 欧 几 
里 得 几何 学 , 称 为 罗 巴 切 夫 斯 基 几 何 , 或 简称 罗氏 几何 . 

罗氏 几何 看 起 来 与 我 们 的 常识 相 冲 突 ,但 也 可 以 利用 欧 氏 几何 建立 一 些 
模型 帮助 我 们 理解 它 , 知 道 它 与 欧 氏 几何 同样 是 合理 的 . 利用 射影 变换 可 以 建 
立 罗氏 几何 的 一 种 模型 如 下 , 称 为 克 莱 苏 模型 . 

在 欧 氏 平面 上 建立 直角 坐标 系 . 以 原点 为 圆心 、1 为 半径 画 一 个 圆 G .图 
G 内 部 的 点 的 集合 作为 罗氏 几何 的 整个 平面 . 直线 在 图 C 内 部 的 部 分 作为 罗 
氏 几 何 的 直线 . 回 G 内 部 的 图 形 C 称 为 罗氏 几何 的 图 形 . 

如 果 一 个 射影 变换 pg 将 圆 G 变 到 自己 , 则 称 g 是 罗氏 几何 变换 . 任 一 罗氏 
几何 图 形 ( 即 圆 C 内 部 的 图 形 ) C 在 任 一 罗氏 几何 变换 下 的 象 YC) 被 认为 与 
C 全 等 . 注意 ,罗氏 变换 一 般 并 不 保持 按 欧 氏 几 何 定义 的 长 度 和 角度 .但 是 ,我 
们 可 以 在 罗氏 几何 中 重新 定义 长 度 和 角度 ,使 任 一 条 线段 与 它 在 任 一 罗氏 变 
换 下 的 象 的 长 度 相 等 , 任 一 个 角 与 它 在 任 一 罗氏 变换 下 的 象 角度 相等 . 

欧 氏 平面 上 哪些 射影 变换 8 可 以 将 圆 C 变 到 自己 ?显然 , 圆 忆 绕 圆 心 的 旋 
转 以 及 关于 直径 的 对 称 都 符合 这 个 要 求 , 因 面 都 是 罗氏 变换 的 例子 ,但 它们 也 
都 是 欧 氏 变换 ,还 不 足以 体现 罗氏 几何 的 特点 . 特别 是 ,它们 不 能 将 一 把 
“尺子 ” 移 到 任何 位 置 去 量 长 度 .下 面 的 练习 给 出 了 一 类 非 欧 氏 的 罗氏 变换 . 
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练习 6 | 


任意 取 定 一 个 实数 4a. 定义 欧 氏 平面 上 的 射影 变 撞 9; (zy)Fe (zy ) 
使 


+:. zchatsha Py y 
TT Tishatcha’ > zshaicha 


其 中 ch cc 一 人 er 十 e-)/2 与 sh cc 一 (e 一 e 一 )7/2 分 别 是 双 曲 正弦 与 双 曲 余 殖 . 
这 样 的 变换 gp 称 为 双 曲 旋转 . 

(1) 阴 图 验证 (也 用 计算 验证 ); 双 曲 旋 转 9 将 园 G:7? 十 y》 二 1 变 到 自 
身 . 因而 是 罗氏 变换 . 

(2) 制 作 罗 氏 刻 度 尺 : 

设 o( 一 1;0),X(1.0) 分 别 是 过 向 与 圆周 G 的 两 个 交点 .观察 (或 计算 验 
证 ) 欧 外 线段 ( 即 罗 氏 直 线 ) XXX 被 变换 9 变 到 自身 . 

在 原点 〇 用 一 条 短 的 竖 线 标 出 一 个 刻度 .和 表 出 口 在 Pp 的 依次 重复 作用 下 
的 象 Mi 二 9(O), Mi 一 gCMD), Ms; 一 JM) ,Miy1 一 IKM),… ,在 所 有 
这 些 点 都 用 短 竖 线 标 出 刻度 . 所 有 这 些 刻度 使 OX 组 成 了 一 把 刻度 尺 . OM, 
是 长 度 单位 , 它 可 以 被 罗氏 变换 9 依次 重复 作用 变 到 相 邻 两 刻度 之 间 的 线段 
Cd hd MMa se , MMNMstris*". 因此 ,所 有 相 邻 两 刻度 之 间 的 罗 有 氏 长度 
相等 ,( 尽 管 它们 的 欧 氏 长 度 越 来 越 短 ). 当 兄 作用 的 次 数 点 无 限 增 大 时 ,作用 
的 象 Mi 党 OX 方向 无 限 接 近 态 ,但 是 永远 不 能 到 这 全 .这 就 是 说 , OX 的 长 
度 等 于 无 限 多 个 单位 长 度 OM， ad 之 和 , 趋 于 无 穷 大 - 也 
就 是 说 ,OO 到 X 的 距离 是 无 穷 远 . 将 平面 绕 原 点 口 旋转 任意 角度 ,也 是 罗氏 变 
撞 ,保持 罗氏 距离 不 变 , 而 上 面 制作 出 的 刘 度 尺 OX 可 以 旋转 成 马 朝 任意 方向 
到 圆周 G 上 的 一 把 刻度 尺 ,圆周 上 G 所 有 的 点 到 加 的 距离 都 是 无 穷 大 ，G 是 
无 穷 远 点 的 集合 .特别 , OX 可 旋转 成 与 自己 的 相反 方向 的 刻度 尺 〇 OX。 ，, 它 与 
OX 方向 的 刻度 尺 共同 组 成 丑 oX 上 的 刻度 尺 ,刻度 由 〇 向 左右 两 个 方向 无 限 
延伸 .这 说 明 XoX 确实 是 两 端 无 限 延 长 的 罗氏 直线 . 

将 过 向 方向 上 的 刻度 刃 旋 转 为 y 轴 方向 上 的 刻度 尺 ， 再 作出 y 轴 方 向 上 
的 这 个 刻度 尺 在 上 述 由 a 决定 的 双 曲 旋转 FP 下 的 象 .改变 4 的 值 ,可 以 将 刻度 
尺 移动 到 高 原点 的 距离 为 任意 值 d < 了 的 地 方 ,然后 又 可 以 旋转 到 任意 方向 . 
这 样 就 可 以 将 刘 度 尺 授 到 任意 地 方 去 度量 长 度 . 

罗氏 平行 公理 : 设 ! 是 罗氏 平面 内 任意 一 条 直线 , 4 是 直线 外 一 点 .从 欧 
氏 几何 看 来 ;1 是 回忆 G 上 两 点 也 ,QQ 之 间 的 线段 . 延长 直线 自 了 A 与 G 交 于 RR， 
延长 直线 段 Q@A4 与 人 口交 于 S. 则 过 有 4 的 两 条 不 同 的 直线 PR, QS 都 与 PQ 不 
相 变 {因为 它们 与 PQ 在 欧 氏 几何 下 的 交点 在 加 上 而 不 在 较 内 ). 而 县, 凡是 过 
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4 上 志 且 穿 过 人 PAS 内 部 与 QAR 内 部 的 直线 与 PQ 也 都 不 相交 . 


(3) 制 作 罗 所 量 角 器 : 

任意 取 定 自然 数 姑 , 设 工 轴 的 正方 向 与 C 的 交点 为 斑 . 从 葡 开 始 在 围 周 
G 上 作 坟 个 点 下 ,Xi，X,，…， XX， 1 将 国 周 郊 等 分 . 则 DO 到 这 些 分 点 所 作 的 ? 
条 连 线 将 以 O 为 顶点 的 周 角 分 成 nn 个 在 欧 氏 几何 中 相等 的 角 , 这 就 做 成 了 一 
个 以 OQ 为 中 心 的 欧 氏 量 角 器 . 将 平面 绕 O 作 逆 时 针 方 向 2rjzn 的 旋转 也 是 罗 
氏 变 拉 , 它 将 上 述 的 个 角 中 的 每 一 个 交 到 下 一 个 .这 说 明 以 OQ 为 中 心 的 这 个 
欧 氏 量 角 器 同时 也 是 罗氏 量 角 器 . 

用 本 练习 开始 所 定义 的 双 册 旋转 蔡 〇 点 移动 到 MM 点 ,同时 也 将 以 〇 为 中 
心 的 上 述 量 角 器 变 成 以 M 为 中 心 的 罗氏 量 角 器 . 观察 看 它 是 否 仍 是 欧 氏 量 角 
器 . 

过 一 点 所 作 已 知 直 线 ! 的 重 线 :用 罗 扎 变换 由 将 人 移 到 原点 O ,直线 移 
到 全 .过 O 〇 作 尹 的 欧 氏 重 线 m ,mm 同时 也 是 人 的 罗氏 重 线 . 再 用 几 的 递 变换 
将 O，1 分 别 变 回 4 , 则 m' 变 到 所 需 的 重 线 机. 试 自己 完成 这 个 作 图 ,观察 
mm 以 在 欧 扩 几何 下 是 否 一 定 醒 直 ? 

自己 研究 罗氏 几何 的 其 它 问题 ， 
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平面 上 以 〈z,y) 为 坐标 的 点 可 以 用 一 个 复数 十 i 来 表示 .这样 , 平 面 
就 称 为 复 平 面 ,每 一 个 变换 9; Cz,y) rr* (x',y') 可 以 看 作 由 一 个 复 变 量 函 数 
z' = f(z) 
决定 ,其 中 2 一 + 十 i,z' 二 xXx' 十 yi, 而 7,y,x',y 都 是 实数 . 选择 不 同 的 复 
变量 函数 f ,就 可 以 决定 不 同 的 变换 . 在 叙述 的 时 候 , 不 妨 将 每 个 复数 > 与 它 
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所 代表 的 点 等 同 , 将 复 函 数 /与 它 所 导致 的 变换 = -> f(z) 等 同 . 


| 练习 7 | 


(1) 选 定 四 个 复 常 数 eyeicvd 满足 条 件 ad 一 Be 了 关 0 ,决定 一 个 复 变 搁 
f(z) = 位 十 4 . 画 出 并 观察 各 种 图 形 在 三 作用 下 的 变化 情况 . 特别 注意 直线 
与 较 被 了 变 成 什么 图 形 , 并 对 你 观察 到 的 现象 作 一 理论 证 明 . 

(2) 取 复 沙 数 f(z) 一 xz? .元 出 并 观察 Xx 方向 和 yy 方向 的 等 距 平 行 线 组 成 
的 网 格 变 成 什么 图 形 ， 

(3) 设 图 形 

C= {rlrER,Irz| 守 1} LU {cos 8 isin 10& 0 x} 
由 以 原点 为 辕 心 的 草 位 辐 的 上 半圆 周 以 及 实 轴 (路 之 轴 ) 在 这 个 单位 加 外 的 部 
分 连接 而 成 . 分 别人 必 出 客 在 变换 


之 十 1 
2 和) | 


作用 下 的 象 ,设法 辨认 出 CC 的 三 个 组 成 部 分 
C={rlr€ R,r< 1)} 
C,={cos 8 isin 810 渤 GT} 
C={r|z€E R,r21} 

分 别 交 成 了 哪 一 部 分 图 形 . 


st) 


f(z} = | 


利用 复 变 换 可 以 给 出 代数 基本 定理 的 一 个 证 明 . 
古典 的 代数 的 基本 任务 是 解 方程 . 因此 ,关于 方程 是 否 有 根 的 如 下 定理 就 
被 称 为 代数 基本 定理 : 
代数 基本 定理 复 系 数 一 元 x 次 方程 
4ot 十 qx” 十 "下 十 a4. 十 a, 二 0 
至 少 有 一 个 复数 根 , (其 中 ae:el，…an 是 已 知 的 复数 , 且 ao 关 0). 
这 个 定理 是 高 斯 《C.F.Gauss) 发 现 并 证 明 的 . 


任 选 一 个 复 系 数 多 项 式 f(z) 二 qoz" 十 Qix" 1 十 十 4s-12 十 0 其 中 ao， 
QI]，"*，4n 是 复 常数 且 co 天 0 , 且 不 妨 设 ao 一 1. 通 过 作 图 来 观察 为 什么 方程 
f(z) 一 0 一 定 有 一 个 根 . 

取 定 一 个 非 负 实 孝 了 作为 = 的 模 , 当 复数 的 幅 角 98 从 0 连续 变化 到 2 


7.5 证 明代 数 基本 定理 69 


时 ,zx 一 rfcos 人 和 十 ising)(0 委 8<2r) 所 对 频 的 点 在 复 平 面 上 画 出 一 个 半 
径 为 的 圈 CC ,而 f(z) (z 一 r(cos0 二 ising,，0 雪 < 2r) 所 对 应 的 点 在 
复 平 面 上 画 出 一 条 封闭 曲线 f(C,) . 在 特殊 情形 了 一 0 下 ,Co 就 是 原点 ， 
(Co) 是 点 an - 

注意 jz) 一 工 十 抽 的 实 部 工 与 庶 部 系数 》 都 是 实 的 自 变量 8 的 一 元 阴 
数 .如果 所 用 的 计算 机 软件 不 能 由 复 驯 数 表 达 式 f(z) 直接 通 出 曲线 (C.)， 
可 以 写 出 X,Y 与 9 的 村 数 关 系 表达 式 , 作 为 曲线 f(C,) 的 参数 方程 ,再 由 这 个 
参数 方程 画 出 图 来 .例如 , 当 所 有 的 系数 wu 都 是 实数 时 ， 

X=aorcos nO ar costn — 1)0+ 二 aircos 8 a, 
y =aorsin MB 十 ar isin 人 zz 一 1)8 十 … 十 airsin 0 

对 一 般 的 情况 ai 一 an 十 aaigeanas 和 及 0 安 z 魏 ?) ,读者 容易 自 己 写 出 Ty 
的 表达 式 . 

我 们 的 目的 是 要 证 明 : 必 然 存 在 一 个 正 实数 ,使 得 以 原点 为 国 心 、r 为 
半径 的 国 C, 的 象 1(C,) 经 过 原点 DO( 即 复数 0 所 对 应 的 点 ). 

(1) 取 一 个 7 ,前 出 曲线 f(C,) ,同时 也 画 出 圆 C 在 变换 f1(z) 二 xz" 下 的 
象 fCC,). 

看 一 看 , 想 一 起 , f1(C,) 是 什么 图 形 ? 它 是 否 将 原点 DO 包含 在 内 部 ? 
了 (C,) 是 否 将 原点 O 包含 在 内 部 ? 

取 很 大 的 > :着 万 (C-) 与 A(C,) 的 图 象 是 和 否 相 当 接 近 ? f(C,) 是 否 将 原点 
包含 在 内 ? 试 对 你 所 观察 到 的 现象 作 一 理论 解释 . 

可 以 复 现 , 无 论 对 于 什么 多 项 式 及 ,只 要 7 取 足 够 大 的 值 尺 , 就 可 以 使 
(Cn) 与 f1(Can) 的 图 象 相 当 接 过, 使 它们 都 将 原 志 包含 在 内 . 

(2) 将 7 从 民 值 逐渐 缩小 ,观察 f(C,) 的 变化 趋势 . 

由 于 f(Cg) 将 原点 〇 包含 在 内 ,而 7 = 0 所 对 应 的 图 象 (C6) 是 一 个 点 
Qas. 当 rr 从 民 连 续 减 小 到 0 时, f(Cr) 连续 变化 ,最 后 收缩 为 一 个 点 ,在 收缩 过 
程 中 必然 要 扫 过 原点 O. 也 就 是 说 ,在 尺 与 0 之 间 必 然 有 某 一 个 7 二 mm 值 使 
f(C,) 经 过 原点 ，C 上 有 一 点 zo 二 rolcos bo 十 isin 名) 的 象 f(zo) 二 0. 这 
个 事实 对 于 所 有 的 多 项 式 都 成 立 , 这 就 说 明了 代 教 基本 定理 的 正确 性 . 

当然 , 作 图 只 能 提供 一 个 直观 的 思路 ,还 需要 将 这 个 思路 用 严格 的 数学 语 
言 叙 述 出 来 ,才能 算是 对 代数 基本 定理 的 一 个 真正 的 证 明 . 

〈3) 搜 索 复 根 : 

实际 作 图 时 ,如 果 能 用 动画 的 形式 让 了 (Cu) 连续 变化 到 f(Co) ,可 以 直 
接 现 察 到 f(C) 扫 过 原点 的 现象 . 

否则 ,只 能 让 了 取 若 干 离 数 的 值 miray… 从 民 减 少 到 0, 观 察 曲线 f(C) 
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越过 原点 的 现象 . 如 果 封 闭 曲 线 A(C,) 的 所 有 的 国都 将 原点 包 合 在 内 ， 而 
CC， ) 已 经 有 某 一 图 越过 了 原点 , 则 fCC,) 在 与 五 :1 之 间 某 个 值 时 刚好 
扫 过 原点 .此 时 取 记 i 与 ri 的 平均 值 rityz 三 (ri 十 reri)/2 ,看 了 CC 是 
否 已 越过 原点 . 如 果 没 有 越过 , 则 了 (CC,) 在 某 个 ra 之 7 之 ritl 处 提 过 原点 ， 
取 rt 与 riti 的 平均 值 再 试 . 如 有 果 fC sn) 已 越过 原点 , 则 取 z 与 ria 的 
平均 值 再 试 . 重复 此 过 程 , 可 求 得 具有 足够 精确 度 的 re ,使 FCC-) 近似 地 经 过 
原点 .这 就 求 得 了 一 个 复 根 zo 的 模 六 . 

下 面 还 需要 求 出 幅 角 名 使 二 rolcos 0 十 isin 0,) 满足 条 件 f(z6) 一 0. 
设 Fro(cos 8 十 ising)) 一 工 十 Wi 其 中 zyER 都 是 日 的 函 教 .在 同一 坐 
标 系 中 部 出 

T= X00, y= yy, O00 和 R27R 

的 图 象 ,通过 观察 可 找到 这 两 条 曲线 与 86 轴 的 公共 交点 , 取 交 点 的 神 举 标 
8 二 0,. 则 zo 二 rolcos 9, 十 isin 0,) 是 所 末 的 一 个 根 . 


实验 八 天 体 运 动 


开 普 勤 很 据 他 同时 代 的 天 文学 家 第 谷 ' 布 拉 赫 对 行星 运动 长 期 大 量 观测 
的 数据 ,以 及 他 自己 对 行星 运动 的 观测 和 巨大 的 复杂 计算 ,得 出 了 行星 运动 的 
三 大 定律 : 

第 一 定律 :行星 运动 的 轨道 是 梓 圆 ,太阳 位 于 这 个 椭圆 的 一 个 焦点 - 

第 二 定律 :从 太阳 到 行星 的 所 引 的 矢 径 在 相同 时 间 内 扫 过 相同 的 面积 . 

第 三 定律 :行星 绕 太 阳 的 周期 的 平方 与 其 轨道 半 长 轴 的 立方 成 正比 . 


图 8- 1 
牛顿 由 开 普 勒 定律 导出 了 万 有 引力 定律 . 反 过 来 ,由 牛顿 万 有 引力 定律 和 
牛顿 第 二 定律 可 以 推导 出 在 太阳 引力 下 的 天 体 的 运动 定律 . 开 普 勒 定律 和 和 牛 
顿 定 律 之 间 的 相互 推导 可 以 由 解 微 分 方程 来 实现 .本 实验 则 利用 数值 分 析 方 
法 来 作 它 们 的 相互 推导 . 


8.1 行星 运动 的 加 速度 


我 们 希望 知道 行星 在 任 -位 置 所 受 力 的 方向 和 大 小 ,并 研究 这 个 力 与 行 
星 所 在 位 置 的 关系 . 根据 牛顿 第 二 定律 ,只 须根 据 开 普 勒 定律 研究 行星 运动 时 
的 加 速度 的 变化 情况 ,也 就 知道 了 行星 运动 时 的 受 力 情况 . 

实验 原理 

将 行星 看 作 一 个 质点 ,以 太阳 的 位 置 O 为 原点 ,在 行星 运行 的 棍 圆 平面 
内 建立 直角 坐标 系 , 写 出 椭圆 方程 .行星 在 任 一 时 刻 上 的 位 置 PP 用 坐标 (x,y) 
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表示 . P 的 位 置 随 : 而 变化 , 它 的 两 个 坐标 x 一 zxG),y 一 yG) 都 是 z 的 函数 . 
行星 的 运动 可 以 分 解 为 + 方向 上 的 分 运动 与 y 方 向 上 的 分 运动 的 合 运 动 . 这 
两 个 分 运动 分 别 由 函数 x = x(t) 和 y= y(t) 来 描述 . 

行星 由 点 P(x (0) ;y(t0)) 运动 到 点 Pa(zx(ty) ,sy (82)) 的 时 间 At ==ts 一 
与 和 撩 径 O 蕊 到 5 友 所 扫 过 的 椭圆 内 的 部 分 的 面积 SCP,,P。:) 成 正比 . 设 行星 
绕 桥 圆 运行 一 圈 的 周期 为 了 ,椭圆 面 积 为 8$ , 则 A = ES CP,P:) ,其 中 一 
T/S .因此 ,了 的 位 置 (z,y) 随 t 变化 的 函数 关系 是 已 知 的 ,描述 两 个 分 运动 
的 函数 z 二 z(t),y 二 y(t) 也 是 已 知 的 . 只 要 求 出 这 两 个 分 运动 在 任 一 时 刻 : 
的 加 速度 a(t) ,a,(z) ,也 就 是 求 出 了 行星 运动 的 加 速度 矢量 x(t) 在 x 方向 和 
y 方向 上 的 分 量 , q(t) 也 就 知道 了 . 研究 加 速度 矢量 xf) 的 方向 和 大 小 与 行 
星 位 置 的 关系 ,就 可 以 得 出 万 有 引力 定律 . 

怎样 求 在 任 一 时 刻 上 = 加 加 速度 的 两 个 分 量 c 和 a, ? 以 求 a; 为 例 : 在 局 
前 后 很 短 的 一 段 时 间 里 ,可 以 近似 地 将 x = z(t) 所 描述 的 运动 看 作 匀 加 速 运 
动 , 求 出 它 的 加 速度 作为 1 = i 时 的 加 速度 . 按照 高 中 物理 知识 ,具体 求法 可 
为 : 设 上 二 加 < 让 一 上 很 小 ,并 且 已 经 分 别 知 道上 一 上 it 时 的 工 值 
-isXosX1. 则 从 t_, 到 吉 这 段 时 间 内 的 平均 速度 


它 就 是 在 时 刻 t.。s = 二 (2-1 十 6)/2 的 瞬时 速度 . 同样 ,从 i 到 二 的 平均 速度 
a 


vo.5 一 
0 tto 


它 就 是 在 时 刻 t6.s 二 (to 十 5)/2 的 瞬时 速度 . 于 是 加 速度 
Vns — UC-—0,s 


(to) 一 


to5 一 了 -os 
同样 可 求 出 加 速度 在 > 方向 上 的 分 量 wev(to) . 

上 面 所 求 的 加 速度 分 量 «(to) ,a,(to) 就 是 函数 zG) 和 >y() 在 上 一 加 对 上 
的 二 阶 导数 . 上面 所 说 的 方法 实际 上 就 是 :在 上 一 的 附近 的 一 个 很 短 的 区 打 
内 ,将 二 阶 导 数 认为 是 常数 ,将 函数 近似 地 看 作 不 超过 二 次 的 多 项 式 画 数 


Xf) 一 开 十 天 E 十 克基 .所 知 一 二 人) (i 二 一 1,0,1 ) 就 可 以 求 出 系数 大， 
ks; ,有 从 而 求 出 其 二 阶 导数 < = 了: 作为 上 一 如 时 二 阶 导数 的 值 . 
实验 方法 


设 行 星 轨 道 椭 辆 半 长 轴 和 半 短 轴 分 别 为 a,6 , 半 焦 距 为 < 二 va 一 六 ， 
行星 运动 周期 为 了 . 设 太 阳 位 置 为 定点 〇 ,行星 位 置 为 动 点 了 . 

(1) 以 太阳 位 置 O 为 原点 建立 直角 坐标 系 , 使 顶 圈 的 中 心 坐标 为 
(一 c,0). 写 出 椭 贺 的 参数 方程 
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en 0<p< 2 
?3 一 psin 9 
{2) 假 定 行星 从 9 二 0 的 点 (a 一 c,0) 开始 沿 逆 时 针 方 向 ( 即 2 增加 的 方 
问 ) 运 动 . 按 行 星 运 动 的 先后 顺序 在 椭圆 上 依次 取 入 个 点 (比如 和 N= 
100 ) PP, (zi 一 0,1:2 RN 一 1), 对 应 的 参数 0 一 名 所 风 所 … 挟 
俘 之 “之 ri 二 27 ,使 所 有 的 +1 一 吕 都 很 小 ,每 两 个 相 邻 的 点 P,P,4) 非 
常 接近 .约定 Bp; = 27 ,Pn = 二 Po.) 
(3) 用 三 角形 APOP,+ 的 面积 AS, 近似 地 代表 矢 径 6 户 到 OP,wi 所 扫 过 
的 面积 . 
1 |X 3 
3 Trl Yi,l 
根据 开 普 勤 第 二 定律 ,行星 从 了 P; 到 已 + 所 花 的 时 间 a&z; 与 5, 成 正比 .行星 运 
行 一 图 的 时 间 等 于 周期 , 矢 径 所 扫 过 的 面积 就 是 整个 椭圆 的 面积 S 二 xab， 
取 常 数 p= 二 TT/rxab , 则 At; = 二 pAS,. 
(4) 将 行星 从 Pi;_' 到 Pi+1 的 运动 看 作 匀 加 速 运动 ,根据 Pi_1,P;,Piti 三 
点 的 坐标 及 Ai-ci 计算 出 加 速度 的 zx 分 量 和 > 分 量 , 作 为 行星 在 已 , 点 的 加 
速度 分 量 ,从 而 确定 了 行星 在 P; 点 的 加 速度 矢量 ， 


(1) 给 出 术 圆 半 长 灿 、 半 短 轴 Ga 池 的 具体 值 . 选 定 一 个 固定 的 常数 二 ,按照 
开 普 勒 第 三 定律 T? 一 kas 算出 周期 全 的 值 . 按 上 述 实 验方 法 ,计算 行星 在 每 
个 位 置 Pi 的 加 速度 失重 a(P,;) . 

(2) 对 每 一 点 P; ,加 选 度 拓 量 Q(P) 的 方向 与 位 置 失 量 口 成 的 方向 有 什 
么 关系 ? 

(3) 对 每 一 点 P ,研究 两 个 夫 量 的 大 小 a 二 ||a(Pi) 上 与 + 一 OF 之 间 
的 函数 关系 9 二 f(r) .为 此 , 接 照 你 所 得 到 的 数据 作出 函数 a 二 f(r) 的 图 
像 , 铺 测 它 是 什么 函数 的 图 像 . 再 作出 y 二 Ina 与 包 二 Inr 之 间 的 函数 关系 
3 一 户 (zo) 的 图 像 ,通过 观察 图 像 得 出 它们 之 间 的 函 教 关系 ,从 而 得 出 与 
之 间 的 函数 关系 , 你 得 出 了 什么 结论 ? 计算 ar? 的 值 ,看 它 是 否 随 + 而 变动 ?是 
否 因 4a, 的 不 同 而 变动 ? 


1 
二 CiYitl — X11y:) 


讨论 和 推广 
本 实验 求 函 数 x = rt) 在 给 定 的 点 的 二 阶 导数 的 方法 称 为 数值 数 分 法 . 
一 般 的 说 ,要 求 函数 》 一 f(z) 在 给 定点 x = zo 的 导数 ,可 以 按 导 数 的 定义 ， 
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取 工 的 一 个 很 小 的 增 量 6 ,计算 差 商 
Sd 


作为 导数 的 近似 值 . 这 实际 上 是 将 函数 在 区 闻 [xo,xo 十 6j 内 近似 地 当做 一 次 
耳 数 来 求 它 的 导数 . 如 果 希 望 更 准确 一 些 , 取 + ;< zo<T 使 zi 一 xzro 和 
ze 一 -1 都 很 小 而 且 比 较 接 近 , 将 函数 在 区 间 [zx-1,z] 内 近似 地 当做 不 超过 
二 次 的 多 项 式 函 数 > 二 kar? 十 名 zx 十 ,由 晴 数 在 工 -，, zo, 三 点 的 值 求 出 
待定 的 系数 to, 名 ,ki ,然后 就 可 求 出 zo 点 的 一 阶 导数 2kzxo 十 和 二 阶 导 数 
2ks . 如 果 和 希望 进一步 提高 精确 度 , 可 以 在 更 多 的 点 用 更 高 次 的 多 项 式 函 数 去 
氮 合 y = f(z)， 


8.2 万 有 引力 作用 下 的 天 体 运 动 


在 练习 1 中 ,你 当 了 一 次 牛顿 ,由 齐 普 勒 定律 得 出 结论 :行星 运动 时 受到 
的 力 的 方向 指向 太阳 , 力 的 大 小 与 行星 到 太阳 的 距离 的 平方 成 有 反比 . 这 个 力 就 
是 太阳 对 行星 的 万 有 引力 . 现在 反 过 来 ,已 经 知道 万 有 引力 定律 ,我 们 来 考察 
在 太阳 的 引力 作用 下 的 天 体 ( 包 括 行 星 . 慧 星 等 ) 的 运动 规律 . 


实验 原理 和 方法 

以 太阳 位 置 O 为 原点 建立 平面 直角 坐标 系 . 由 万 有 引力 定律 ,天 体 在 任 
一 位 置 PCx,y) 的 加 速度 矢量 方向 指向 太阳 ,其 大 小 «一 lall 与 天 体 到 太 
阳 的 四 离 7 = | 5 疡 外 = YZ 干 立 的 平方 成 反比 . 即 
_£.0F 

r? r 

其 中 类 是 与 天 体位 置 书 无 关 的 常数 . 由 此 可 以 算出 的 坐标 ( 即 它 的 x 分 量 和 
yy 分量) 


4 一 一 一 0 一 一 一 


任意 给 定 天 体 的 初始 位 置 Po(zoyyo) 以 及 初速 度 矢 量 vo 的 坐标 
《vozsv0y). 由 上 面 的 公式 算出 天 体 在 这 一 点 的 加 速度 矢量 ao 的 坐标 
aoz 一 一 此 To 十 93) 3 aoy 一 一 下 yo 十 3) 
选 定 一 段 很 短 的 时 间 且 9 .在 这 跨 很 短 的 时 间 内 ,可 以 近 艇 地 认为 加 速度 
as 不 变 ( 实 际 上 是 变化 很 小 ). 天 体 以 这 个 不 变 的 加 速度 运动 ,就 好 比 地 球 上 
斜 抛物 体 的 运动 一 样 . 根据 其 初 位 置 、 初 速度、 加 速度 可 以 算出 经 过 时 间 人 之 
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后 天 体 的 位 置 Pi 的 坐标 (Xx1，%1) 及 速度 vy 的 坐标 (wypiy) : 


上 i pe = Yoz 十 aoz 


一 个 
ly 一 yo 十 voy6 十 六 co 人 Viy 一 Voy 十 ao 


现在 以 了 | 为 新 的 出 发 点 ,为 新 的 初速 度 . 用 前 面 同样 的 方法 又 可 计算 
出 天 体 在 已 点 的 加 速度 矢量 ,以 及 经 过 时 间 9 之 后 的 位 置 P。 和 速度 矢量 v 
的 坐标 . 

重复 上 述 过 程 ,就 可 以 得 出 行星 运动 的 一 系列 的 位 置 P; 和 在 这 些 位 置 的 
速度 矢量 v . 依次 将 这 些 位 置 连 成 一 条 折线 ,就 近似 地 得 到 了 行星 运动 的 轨 
道 曲线 .也 可 将 每 两 个 相 邻 位 置 P.,Piti 按 “ 斜 抛物 体 ” 运 动 轨道 用 搜 物 线 连 
接 起 来 ,由 一 段 一 段 抛物 线 连 成 行星 运动 轨道 . 》 

上 述 求 行星 运动 轨道 的 方法 显然 是 一 个 近似 方法 . 每 次 的 时 间 段 6 取得 
越 小 ,精确 度 越 高 ,但 计算 量 也 越 大 . 因此 ,要 根据 需要 选取 适当 的 时 间 段 . 


《1 给 定 天 体 的 不 同 的 初 位 置 和 初速 度 , 按 照 上 述 方 法 , 求 出 行星 轨道 上 
一 系列 点 的 位 置 的 坐标 及 在 这 些 位 置 的 过 度 失 量 的 坐标 . 

(2) 根 据 体 得 到 的 数据 , 画 出 天 体 运 动 的 轨道 图 线 ,改变 所 取 的 时 间 段 9， 
看 所 得 到 的 图 线 有 何 变化 .改变 初速 度 的 方向 和 大 小 ,观察 图 线 的 变化 情况 ， 
轨道 图 线 是 否 一 定 是 椭圆 ? 有 何 规律 ? 

《3) 根 据 你 得 到 的 数据 ,验证 开 普 勒 第 二 定律 ， 


讨论 与 推广 
本 练习 所 做 的 是 :已 知 天 体 在 任 一 位 置 Ptx,y) 的 位 置 矢量 上 一 O 疡 与 加 
速度 矢量 和 之 间 满 足 微分 方程 
dr 一 
dr: 
《其 中 7 = lIrl| = YZ 十 立即 
中? 并 


可 一 一 krlr? 十 2 32 


殉 r 
pg 
72 rr 


de 
了 =— ky(x: + y) 


并 且 给 定 了 天 体 在 某 一 初始 时 刻 的 位 置 Polzx(to),y(to)) 及 速度 v= 
《X(t0) ,y(t0)) ， 求 天 体 在 任 一 时 刻 上 的 位 置 已 CzGt)yytt)) 
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本 练习 是 用 数值 方法 求 这 个 方程 的 近似 解 . 其 基本 思路 是 ,在 自 变量 的 
一 个 很 短 的 区 间 [ts 十 A] 内 ,将 二 阶 导数 9 芝 ,9 学 近似 地 看 作 不 变 ,由 ， 
y 及 其 一 阶 导数 在 t = t。 点 的 值 求 得 它们 在 + 一 十 A 点 的 值 

这 个 思路 可 以 用 来 解 别 的 微分 方程 及 其 应 用 问题. 比如 , 解 - 般 的 一 阶 微 
分 方程 

2 = f(x,y) 
可 从 给 定 的 初始 点 (zo,y6) 出 发 , 取 工 的 一 个 小 的 增 量 3 > 0 ,认为 导数 往 的 
值 在 zx 的 小 区 间 [zo,xo 十 6] 内 近似 地 不 变 , 约 等 于 f(z。,yo) ,因而 在 这 个 区 
间 内 
Yr) 一 3 十 (rosyo(z 一 To)，yzs 和 过 委 To 十 

取 一 zo 十 By 一 20zi) 二 30 十 f(To,y0)6 .再 以 《rT1,y1) 为 新 的 初始 点 ， 


用 f(zisy) 近似 地 作为 在 zx 的 区 间 [zivz, 十 6] 内 导数 入 的 值 ,算出 在 这 
个 区 间 内 任 一 zx 所 对 应 的 y 什 

yr) = yt Fx, yx Co xz) 
重复 此 过 程 ,可 以 得 到 在 给 定 范围 内 xz 所 对 应 的 》 值 . 这 个 过 程 实际 上 是 将 本 
数 y 一 y(z) 看 作 分 段 的 一 次 函数 ,用 一 段 段 很 短 的 直线 段 组 成 的 折线 米 通 近 
? 一 y(z) 的 曲线 . 解 微分 方程 的 这 个 数值 方法 叫做 欧 拉 折 线 法 . 


8. 3 其 他 几 个 物理 理 象 的 数学 模拟 


1. 点 电荷 组 的 电力 线 及 等 势 面 


(1) 丙 个 等 量 异 种 点 电 苏 分 别 放 在 4, 召 两 点 . 试 在 全 :再 所 在 的 平面 内 画 
出 它们 所 产生 的 电场 过 一 些 给 定点 的 电力 线 和 等 势 线 ， 

(2) 假 定 (1) 中 的 点 电荷 带电 量 不 同 , 或 者 带 同 种 电荷 ,或 者 有 三 个 点 电 匣 
(带电 种 类 及 带电 量 自 己 设 定 ) ,在 平面 内 画册 所 产生 的 电场 的 电力 线 及 等 
势 线 . 

提示 ;从 某 一 点 Po 出 发 ,算出 这 一 点 的 电力 线 方向 ,党 着 所 算出 的 方向 走 
一 小 段 到 P, 点 .再 重新 算出 已 , 的 电力 线 方向 , 活 这 个 方向 再 走 一 小 段 - 重复 
此 过 程 , 画 出 电力 线 . 用 同样 的 方法 画 出 等 势 线 . 
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2. 凹面 镜 的 正确 形状 
按照 中 学 物理 课程 所 说 ,反射 面 为 球面 的 四 面 镜 将 乎 行 于 主轴 的 光线 反 
射 之 后 会 聚 于 一 点 , 称 为 这 个 凹面 镜 的 焦点 . 下 面 通过 实验 来 验证 这 个 结论 ， 


(1) 设 CO 是 凹面 镜 的 主轴 ， 即 镜面 所 在 的 球面 的 一 条 坦 径 ,O 是 球 心 ，C 
是 镜面 的 顶点 .过 CO 作 轴 截面 交 镜 面 于 一 段 国 弧 ACB , 则 镜面 可 以 认为 是 
颖 AC 绕 CO 旋转 一 周 得 到 . 按照 凹面 镜 的 要 求 , 终 AC 所 对 的 国 心 角 一 4OC 
应 当 比 较 小 ,比如 不 超过 5° . 只 须 验 证 这 个 轴 蕉 面 上 平行 于 主轴 CO 的 光线 经 
过 反射 后 是 否 会 聚 于 一 点 . 

设 忆 是 颖 AB 上 和 任 一 点 .过 也 作 PM NA CO ,光线 沿 MP 射 到 镜面 上 了 
点 . 作 PN 镜 NPO 一 人 OPIM (使 PO 是 人 NPIM 的 平分 线 ). 则 PN 是 MP 
的 反射 光线 . 对 弧 AB 上 若干 个 不 同 的 P 点 作 反 射 光线 ,看 它们 是 否 会 聚 于 一 
点 ?7 如 果 是 ,会 聚 于 哪 一 点 ? 

保持 顶点 C 和 球 心口 不 变 , 将 人 人 AOC 增 大 (比如 超过 45" 其 至 接近 
90° ), 重 做 上 而 的 实验 ,看 平行 于 主轴 CO 照射 到 镜面 上 的 光线 是 否 会 聚 于 一 
点 ? 


实验 表明 : 当 人 4OC 很 小 时 ,平行 光线 近似 地 会 聚 于 CO 的 中 点 下 . 当 
几 4OC 增 大 时 ,这 一 结论 的 误差 越 来 越 大 . (实际 上 ,这 一 结论 也 很 容易 由 平 
面 几何 的 理论 推导 得 出 . ) 

既然 如 此 ,我 们 希望 知道 : 当 镜面 AOB 成 什么 形状 时 ,平行 于 主轴 CO 的 
光线 才 真 正 地 会 聚 于 一 点 ? 


(2) 取 一 条 直线 CF 作为 凹面 镜 的 主轴 ,C 作为 镜面 的 顶点 ,下 作为 不 点 . 
通过 作 图 方法 得 出 过 C 点 的 镜面 的 正确 形状 ,使 平行 于 主轴 CF 的 光线 经 镜 
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面 反 射 后 全 部 会 聚 于 下 点 . 作 图 步骤 如 下 : 

延 状 CF 到 人 〇 使 FO=CF , 即 下 是 CO 的 中 点 .以 〇 为 圈 心 、OC 之 长 为 
半径 作 一 小 段 圈 CP ,( 比 如 ,使 ~COP 不 超过 5° ). CP 可 以 近似 地 作为 镜 
面 的 一 部 分 ,使 平行 于 CF 且 照 到 这 一 部 分 镜面 CP 上 的 光线 会 聚 于 下 ,过 PP 
作 PM // CF .要 使 光线 MP 的 反射 光线 为 PF ,镜面 在 书 点 的 法 线 方 向 己 愉 
应 是 了 MPF 的 角 平 分 线 .过 也 点 作 户 PN , 则 户 是 镜面 在 PP 点 的 切线 .从 
已 出 发 .在 上 向 远离 主轴 的 方向 取 一 条 很 短 的 线段 (长 度 由 人 自己 选 
定 》PP, ,近似 地 作为 镜面 的 一 部 分 .再 用 Pi 点 代替 已 ,用 同样 的 方法 确定 镜 
面 在 了 | 的 切线 ,在 此 切线 上 向 远离 主轴 的 方向 上 截取 很 租 的 线 稻 PiPz 作为 
镜面 在 PP 点 的 一 部 分 . 重复 此 过 程 一 直到 你 感 意 停止 ,作出 一 条 折线 ,与 国 弦 
CP 连 在 一 起 ,近似 地 作为 镜面 与 轴 截 面 的 交 线 ,而 它 绕 主轴 旋转 所 得 的 曲面 
作为 镜面 . 

观察 你 所 作出 的 镜面 与 轴 蕉 面 的 变 线 好 象 是 什么 曲线 ? 它 在 靠近 顶点 已 
的 部 分 近似 地 是 以 口 为 圆心 的 较 器 ,而 在 以 后 就 逐渐 远离 这 个 轩 . 观察 它 好 
象 是 握 物 线 . 过 你 所 得 的 镜面 蕉 线 的 终点 作 一 条 以 CC 为 顶点 ,以 CF 为 对 称 轴 
的 抛物 线 , 观 察 它 与 你 所 得 的 镜面 截 线 是 否 吻 合 ? 


试 对 凸透镜 的 聚 光 人 性 能 作 类 似 的 讨论 . 


3. 芸 链 线 

将 一 根 绝对 柔软 .均匀 .无 伸缩 性 的 细 线 两 端 固 定 , 让 它 身 然 下 垂 所 成 的 
曲线 称 为 悬 链 线 . 县 链 线 有 什么 性 质 ? 它 的 方 积 是 什么 ? 

不 妨 设 芸 链 线 两 端的 固定 点 的 高 度 相同 , 则 线 的 中 点 C 为 悬 低 点 , 称 为 
最 链 线 的 顶点 . 以 C 为 原点 , 竖 直 向 上 的 方向 为 y 轴 正 方向 ,在 曲线 所 在 的 平 
面 内 建立 直角 坐标 系 . 


图 8 一 3 
设 了 是 曲线 上 任 一 点 ,我 们 来 分 析 从 C 到 了 这 有 段 曲 线 的 受 力 情况 . 由 于 
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处 于 平衡 状态 ,这 段 明 线 所 受 合力 为 0. 另 一 方面 ,这 段 曲线 共 受 三 个 力 : 重 力 
G ,在 C 点 所 受 的 水 平 拉力 天。 ,在 PP 点 所 受 的 倾斜 拉力 让, 水平 拉 力 Fo 与 P 
的 位 置 无 关 , 是 便 力 , 没 其 大 小 为 和 .倾斜 拉力 的 方向 是 曲线 在 已 点 的 切线 方 
向 , 设 它 与 轴 正 方向 的 夹 角 为 g .重力 G 方 向 向 下 ,其 大 小 与 曲线 强 CP 的 
长 度 s 成 正比 ,可 记 为 ps . 如 果 P 在 第 一 象限 , 则 FF 与 G 的 合力 的 坐标 为 
《一 了 ,一 B03) .下 一 一 下 的 坐标 汶 (fps) ,tan 9 址 ps/f = 二 与 弧 长 成 正比 . 
tan 9 也 就 是 曲线 在 PP 点 的 斜率 ,与 弧 长 CP 成 正比 . 曲线 在 第 二 象限 的 部 分 
与 它 在 第 一 象限 的 部 分 关于 y 轴 对 称 . 


建立 直角 坐标 系 . 选 定 比例 系数 a ,使 晤 链 钱 上 任 一 点 已 的 斜率 kp 一 
cs 其 中 5 是 由 翅 链 线 的 顶点 到 已 的 性 长 . 

以 原点 O 作为 悬 链 线 的 顶点 , 选 定 一 个 短 的 长 度 1. 从 口 向 工 轴 正 方向 
上 藏 取 长 为 人 的 线段 OP, 作为 王 链 线 的 一 部 分 . 是 链 线 在 Pi 的 斜率 友 应 为 
a* |OP| 一 CA .由 忆 作 斜率 为 aA4 .长 为 4 的 线段 PiPi 作 为 是 链 线 的 下 一 部 
分 . 再 由 PP 作 冬 率 为 244 、 长 为 4 的 线段 PP; .重复 这 一 过 程 可 以 作出 从 口 
出 发 的 一 条 折线 OPiP2…P……，, 使 组 成 祈 线 的 每 条 线段 了 ,1P, 的 儿 率 为 
nad ,而 长 度 都 是 4. 这 条 折 线 可 以 认为 是 是 链 线 在 一 象限 内 的 近似 形状 . 它 
关于 yy 轴 的 对 称 图 形 是 基 链 线 在 二 象限 内 的 近似 形状 ， 

是 链 线 样子 看 起 来 有 点 象 搜 物 线 . 事实 上 ,在 顶 点 附近 ,曲线 的 儿 率 接近 
手 0, 颖 长 OP 近似 地 等 于 已 点 的 可 坐标 工 .斜率 y = 二 at 正 是 抛物 线 »== 
0. 54az? 的 特征 性 质 .但 当 卫 离 品 比 较 远 时 这 一 结论 就 不 对 了 .在 你 作 的 是 和 链 
线 上 取 一 点 书 离 口 尽 可 能 远 . 过 已 作 以 口 为 项 芯 、y 轴 为 对 称 轴 的 抛物 线 , 观 
察 它 与 你 所 作 的 悬 链 线 是 否 比 较 响 会 ? 选择 双 曲 余弦 函数 yy 一 bch(x/b) 一 6 
参数 快 使 它 的 图 像 经 过 已 点 ,观察 它 的 图 像 与 巧 链 线 是 否 比 较 吻 会? 
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用 极 坐 标 (r ,9) 来 表示 每 一 点 已 的 位 置 . 如 果 以 极点 O 为 原点 . 极 轴 为 
z 轴 的 正方 向 , 则 该 点 的 直角 坐标 为 (rcos 9 rsin 9) .并且 可 以 用 复数 
rlcos 9? 十 isin 1 来 表示 点 P 的 位 置 向 量 > 一 G 疡 . 记 m = cos 9 十 isin yp 为 > 
方向 上 的 单位 向 量 , p" 一 ir" 一 一 sin 2 十 icos 为 将 下 沿 道 时 针 方向 旋转 直 
角 得 到 的 单位 向 量 , 则 ,p* 构成 二 维 空间 的 一 组 基 , 特别 "一 rr. 
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天 体 的 位 置 向 量 r 二 rr* 随时 间 : 而 变化 , >,9p 都 是 : 的 函数 . 将 + 的 任 一 
函数 = ( 纯 量 或 向 量 ) 对 + 的 一 阶 导数 和 二 阶 导数 分 别 用 >,z 表示 . 注意 
Pa 一 (一 sin Jp 十 icos 内 % 一 ipr = yp 
P' 一 im = Yr —— $m 
于 是 速度 向 量 
一 郑 一 Fr +rpm 
加 速度 向 量 
人 一 让 一 (rr rpp) 十 Gotr op —r pr 
一 人 (f —rG)ri (2rpg+ r 加) 到 
一 人 r 一 了 好 )r9 十 过 Er Pp 
注意 矢 径 扫 过 的 而 积 $ 的 微分 d8 = 十 r*dp. 如 果 已 经 知道 了 开 普 积 第 
二 定律 , 即 矢 径 扫 过 面积 的 速度 他 = 去: 多 是 常量 ,从 而 六 一 一 是 常量 ， 
a 绢  0 ,加 速度 矢量 
a= (7 — rp)r 
与 位 置 矢量 共 线 . 反 过 来 ,如 果 已 经 知道 与 7 共 线 (比如 牛顿 万 有 引力 定 
律 就 是 这 样 说 的 ), 则 4 所 外 = 0 ,于 是 六 一 一 多 是 常量 , 开 普 勒 第 二 定律 
成 立 . 
以 下 设 关 一 必 % 是 常量 . 我 们 来 计算 we 表达 式 中 的 系数 # 一 > 好 .其 中 多 
可 写成 气 . 令 x 一 二 , 则 r 色 一 Are .而 


.dl1_ ldu,. du 
”Taw 2 dp 9 hg 
pd da) _ dz yt 
7 一 下 | hyp 4 i 


于 是 
r=— mul 3 十 a 
现在 设 开 普 勤 三 定律 或 立 . 行星 运动 轨道 是 椭 略 , 半 长 轴 、 半 短 轴 分 别 是 
a 志 .可 设 极 点 是 其 焦点 ,其 方程 为 


入 


he 
了 十 ecos 9 
其 中 。 = < 是 偏心 率 ,所 一 乞 .此 时 
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一 工 工 十 ecos 9 
lg 
hu: 
A hul 二 ecos 多 和 lt+ecos 多 hu 
(+ | p p p 
CL 
G 一 一 二 Pr 


rr 


其 中 上 一 入 是 与 9 无 关 的 常数 . 由 于 二 == 二 是 行星 的 矢 径 扫 过 面积 的 速 


度 , 应 等 于 椭 图 的 总 面积 xab 除 以 行星 运动 周期 7 ,从 而 上 = 2362 .而 户 一 


p: 
训 -从 面 


一 Ta 4 
pp TT pp T? 


由 开 普 勒 第 三 定律 ，, 先 是 常数 , 因 面 上 是 与 wb 无 关 的 常数 . 这 就 说 明了 , 太 
阳 对 行星 的 作用 力 


F=mo=— 多 
指向 太阳 ,其 大 小 与 下 成 反比 ,与 mr 成 正比 ,其 中 太 是 由 太阳 决定 的 比例 常 
数 . 这 就 是 万 有 引力 定律 
现在 反 过 来 , 设 万 有 引力 定律 成 立 , 推 出 天 体 运动 的 定律 . 
首先 ,由 天 体 爱 力 指向 太阳 ,加 速度 0 与 + 共 线 ,可 知 h 二 一 ?是 常数 ,也 
就 是 天 体 矢 径 扫 过 面积 的 速度 是 常量 ,这 就 是 开 普 勒 第 二 定律. 
由 万 有 引力 定律 ， 


2 
ut 
+ 


到 2p0 一 Au 人 本- 入， 
0 二 x" 一 gu?r"， 即 hiu dg mm 二 — kur 
于 是 
du _ kk 
dp fr * 


两 边 同和 以 2 各 ,再 对 9 求 积分 ,得 


要 上 1 
[| | 
其 中 ,Cs 是 常数 , 且 显 然 Ce 产 0 .不 妨 写 C, 一 0C?,C 守 0. 
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于 《9 一 网 ) 一 arceos 一 | 
适当 选取 极 轴 的 方向 及 $9 的 旋转 方向 ,可 设 
从 而 
rp 其 中 。 = 一 侍 之 0， p= 生 >0 


这 是 以 太阳 位 置 为 一 个 焦点 的 圆锥 曲线 方程. 当 。 < 1 时 是 精 圆 , 。 = 1 时 是 
抛物 线 , 当 e > 1 时 是 双 曲 线 . 
当 e< 1 时, 设 椭圆 的 半 长 轴 和 半 短 轴 分 别 等 于 a,6 , 则 一 乞 .又 一 


2nrap 
9 , 族 


_h: drab? a 加 dma 


pp TT & pi 


其 中 纪 是 常数 . 这 正 是 开 普 勒 第 三 定律 
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给 定 实数 域 上 光滑 的 实 值 函 数 f(x) 以 及 初 值 ze ,定义 数列 
Tet = fr 1 《1) 

Zo 一 90,3,"…，, 称 为 f(z) 的 一 个 迭代 序列 . 

函数 的 选 代 是 数学 研究 中 的 一 个 非常 重要 的 思想 工具 . 哪怕 是 对 一 个 相 
当 简单 的 函数 进行 迭代 ,都 可 以 产生 异常 复杂 的 行为 ,并 由 此 而 衍生 了 一 些 玖 
新 的 学 科 分 支 , 如 分 形 与 混沌 . 同时 ,迭代 在 各 种 数值 计算 算法 以 及 其 它 学 科 
领域 的 诸多 算法 中 处 于 核 必 的 地 位 .本 书 中 ,我们 将 通过 一 系列 实验 介绍 和 迭代 
在 诸多 领域 的 应 用 . 首先 ,我 们 来 探讨 利用 迭代 求解 方程 (组 ) 的 近似 解 . 


9.1 方程 求 根 


给 定 选 代 函 数 A(z) 以 及 一 个 初 值 xo ,利用 (1) 选 代 得 到 数列 x, ,7 = 二 0， 
1 . 如果 数 列 zx, 收 僵 于 某 个 x*”, 则 有 
XxX* = f(r') (2) 
即 x* 是 方程 x 二 f(x) 的 解 . 由 此 启发 我 们 用 如 下 的 方法 求 方程 g(x) 一 0 的 
近似 解 . 
将 方程 ECz) 一 0 改写 为 等 价 的 方程 
X= /f(r) (3) 
然后 选取 一 初 值 利用 (1 做 迭代 . 迭代 数列 z, 收 华 的 极限 就 是 方程 g(z) 二 0 
的 解 . 
用 上 述 方 程 求 方程 的 根 的 一 个 首要 问题 是 
和 迭代 序列 是 否 收 化 ? 
证 我 们 先 从 线性 函数 的 选 代 开 始 讨论 ， 


设 yr) 一 ax 十 五 .利用 (1) 做 迭代 得 到 序列 Ti ,n= 二 0,1,*…. 
(1) 写 出 序列 Xx, 的 通 项 公式 . 
(2) 在 什么 条 件 下 , 迁 代 (1) 对 性 意 的 初 值 之; 都 收效 ? 
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《3 影响 收效 性 的 主要 量 是 什么 ? 它 与 f(x) 的 一 阶 导 数 有 什么 关系 ? 常 
数 五 对 选 代 的 收效 性 有 没有 影响 ? 收 痪 巡 度 的 快 迟 由 什么 重 决定 ? 

(4) 对 于 任意 给 定 的 线性 方程 g{X) 二 于 f+ 十 BB 二 0 ,你 是 否 可 以 将 它 改 写 
成 等 价 的 形式 XT 二 f(x) 使 得 选 代 总 是 收 襄 ? 


对 于 非 线性 情况 ,问题 要 复杂 些 . 由 于 非 线性 方程 的 解 不 止 一 个 ,和 夺 代 序 
列 的 极限 是 否 收 伍 以 及 收 化 到 哪 一 个 解 不 仅 与 方程 友 关 而 且 与 初 值 的 选取 
有 关 . 


考察 用 选 代 函 教 (x) 一 2sin(x) 求解 方程 ECT) 二 2sin(z) 一 工 一 0 的 
解 的 情况 . 

(17 在 同一 直 衣 坐标 系 中 , 画 出 yy 一 rr) 及 ?了 一 工 的 图 象 .从 图 上 观察 ， 
方程 区 二 2sin(x) 有 几 个 解 ? 

(2) 取 褐 值 ze 一 0.5 做 迁 代 ,迭代 序列 是 否 收 化 ? 如 果 收 将, 它 收 化 到 哪 
一 个 解 ? 取 其 它 初 值 , 观 察 选 代 的 结果 .是 否 可 以 选取 到 非 霍 的 初 值 mm ,使 得 
选 代 序列 收 豆 到 BCz) 一 0 的 解 工 一 07? 

(3 你 能 否 解释 (2) 中 观察 到 的 现 介 ?对 非 线性 选 代 , 和 迭代 序列 收 黎 性 与 什 
么 因素 有 关 ? 体能 否 给 出 透 代 收 化 的 一 个 充分 的 条 件 ? 初始 值 的 选取 对 选 代 
的 政 敏 性 以 及 收效 到 哪 一 个 解 有 什么 影响 ? 

(提示 :在 一 个 光滑 函数 的 局 部 , 它 可 以 近似 看 成 一 个 线性 函数 , 然后 ,你 
可 以 利用 线性 选 代 的 有 关 结 论 . )， 


对 于 给 定 的 方程 8(r) 一 0 ,有 无 穷 多 种 方式 将 它 改写 成 等 价 的 形式 (3)， 
但 重要 的 是 

如 何 改写 可 以 使 得 选 代 序 列 收敛 ? 如 何 改 写 才 能 使 得 先 代 序列 收敛 得 
更 快 ? 


将 方程 T ?一 2z 十 1 一 0 政 写 成 各 种 等 价 的 形式 进行 选 代 ,观察 选 代 是 否 
收效 ,并 给 出 解 狐 . 


从 前 面 的 实验 观察 中 知道 ,使 得 选 代 序 列 收 和 敛 并 尽快 收敛 到 方程 g(x) 一 
0 的 某 一 解 的 条 件 是 选 代 函 数 f(x) 在 解 的 附近 的 导数 的 绝对 值 尽 量 小 . 这 启 
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发 我 们 将 迭代 方程 修改 成 
X= h(x) 一 Afz》 十 (1 一 人 (4 
我 们 需要 选取 4 使 得 | 和 (x)| 在 解 的 附近 尽量 小 .为 此 ,我 们 可 以 令 
AT 一 人 Mr 十 1 一 4 一 0 


得 
本 1 
“一 
于 是 
x 7 
a 
特别 地 ,如 果 取 f(x) = g(z) 十 ,由 我 们 得 到 和 迭代 公式 
加 8 (Xr) i 
Tatt 一 Ye 一 erCz7， 也 一 0 1 (5) 


你 能 否 给 出 上 述 改 进 公式 的 几何 解释 ? 重新 做 练习 3, 使 用 改进 的 选 代 公 
式 求 方程 的 根 . 将 它 的 收效 速度 与 你 得 到 的 其 它 的 选 代 公 式 相 比较 ,哪个 
更 快 ? 


选用 几 种 选 代 格 式 求 党 2 的 近似 值 ,并 同 改进 的 选 代 格式 做 比较 . 
9.2 ”线性 方程 组 的 迭代 求解 


给 定 一 个 x 元 线性 方程 组 
区 十 … 十 are 一 已 


本 (6) 
Goal 十 … 十 Qamtn 一 加 
或 写成 矩阵 的 形式 
4xr = (7) 
其 中 4 二 (wj) 是 二 阶 方 阵 , 二 一 (zzo)7 及 五 一 (mp 均 为 nn 维 列 
向 量 . 


熟知 ,当年 阵 4 的 行列 式 非 零 时 方程 组 (7》 有 了 唯一 解 . 如 何 有 效 、 快 速 地 


ee OO 
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寻求 大 型 的 线性 方程 组 的 数值 解 是 科学 工程 计算 中 非常 重要 的 任务 . 迭代 法 
常常 是 求解 这 些 问题 的 有 效 方法 之 一 ， 
用 迭代 法 求解 线性 方程 组 的 的 思想 与 上 节 介 绍 的 方程 求 根 的 方法 是 类 似 
的 , 假设 我 们 可 以 将 方程 组 (7) 改 写成 
x= Mx++f (8) 
其 中 邓 一 tm,,) 是 阶 算 阵 , 二 (所 ,…,f,)7 是 维 列 向 量 .任意 给 定 初始 
向 量 x? ,由 迹 代 


x Mr"+f (9) 
确定 向 量 序 列 x” ,x 二 0,1,… .如 果 x" 收 合 到 向 量 x”, 则 有 
x” = Mx 二 f/f 


即 x” 是 方程 组 (7) 的 解 . 
类 似 于 单 变量 情形 ,我们 关心 的 首要 问题 是 迭代 向 量 列 x* 是 否 收 合 . 为 
此 ,我 们 先 对 M 是 对 角 阵 时 进行 考察 . 


设 用 为 对 角 阵 Diag(rz，…zao) . 则 向 量 列 x" 收 证 的 条 件 是 什么 ? 影响 
收敛 性 及 收 伍 带 度 的 主要 量 是 秆 么 ? 收 化 速度 与 ma ,i 二 1,*…,n 有 何 关系 ? 
常数 向 量 乒 对 收 伍 性 有 无 影响 ?” 初 值 对 收 证 性 与 收 人 证 远 度 有 无 影响 ? 


对 于 较 一 般 的 情形 ,问题 会 更 加 复杂 . 但 单 变量 情形 的 结论 以 及 上 面 的 实 
验 似 乎 表 明 ,影响 欠 代 向 量 列 收 伍 性 的 主要 因素 是 矩阵 W 的 特性 . 下 面 ,我 们 
做 进一步 的 考察 . 


| 练习 7 


设 
2 0. | 
0.4 0.2 
(1) 任 意 取 定 向 量 上 及 初始 向 量 如 利用 (9) 做 选 代 . 向 量 列 x” 是 否 收 化? 
对 不 同 的 向 量 了 及 妆 做 同样 的 观察 , 
《2 矩阵 用 的 特征 值 是 什么 ? 本 是 否 相似 于 对 角 孟 ? 
(3 你 能 否 给 出 选 代 向 量 列 x 的 通 项 公式 ? 体能 和 否 利用 通 项 公式 解释 前 
面 观察 所 得 出 的 结论 ? 
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[5 


分 别 取 
人 一 
m= | | 
| 0 ‘05 
二 


重新 做 练习 7 的 问题 . 


根据 练习 ?7 与 练习 8 的 结论 做 以 下 问题 : 
(1) 给 出 向 量 列 x" 的 通 项 公式 .体能 否 由 此 给 出 迁 代 (9)? 收 数 的 条 件 ? 收 
化 速度 由 什么 决定 ? 
(2 如 果 纸 阵 打 满足 max > ) |zmi| <<1 或 者 max > |mij < 1 ,你 能 否 确 
EIST Tl ren 1 
定 迁 代 (9) 一 定 收 北 ? 


在 得 到 了 和 迭代 (9) 收 和 敛 的 条 件 以 后 ,我们 关心 的 于 一 个 问题 是 ,怎样 将 方 
程 组 (?) 改 成 (8}) 使 得 连 代 (9) 收 敏 而 且 尽 量 收 敛 得 快 . 


给 定 
13 1 
1 ;| 
b 任意 选取 . 将 方程 组 (7) 改 成 多 种 等 价 的 形式 (8) 做 送 代 ,观察 办 代 是 否 收 
化 ? 对 收 误 的 选 代 格式 比较 它们 收效 速度 的 快慢 . 


分 别 取 


88 实验 九 迁 代 (一 ) 一 -方程 求解 


回答 练习 10 同样 的 问题 . 


作为 砂 较 ,下 面 我 们 介绍 丙种 迭代 格式 . 
假设 矩阵 4 的 对 角 元 素 4 关 0 ,一 1 . 今 姜 一 Diag(a yaw)》， 
则 我 们 可 以 将 方程 组 (7) 改 写成 
Dr =- (D— A)x+b 
或 
x= (I— DiAx+D', (10) 
由 上 式 即 可 确定 一 种 迭代 格式 . 
如 果 将 矩阵 (7 一 D 14) 分 解 为 U 十 工 ,其 中 工 ， 了 分 别 为 下 三 角 阵 与 上 
三 角 阵 , 则 (10) 可 以 进一步 该 成 
(TI— Lx=Ux+D-'b 
或 
x= (I— -Ux+ (I— I Db'b (11) 
上 式 又 可 确定 另 一 种 迭代 格式 . 


练习 12 


用 上 述 两 种 迭代 格式 解 练习 10 与 练习 11 中 的 方程 组 ,它们 是 否 收效 ? 收 
效 速 度 如 何 ? 将 它们 同 你 自己 找到 的 达 民 格式 做 比较 , 谁 优 谁 劣 ? 


练习 13 


根据 前 面 的 实验 结果 ,你 能 否 找 到 一 种 迭代 烙 式 , 它 对 任何 线性 方程 组 都 
收效 ? 对 于 具有 某 些 特定 性 质 的 系数 短 阵 4 (如 和 正定 ) ,你 能 和 否 找到 一 种 收 
效 的 迁 代 格式 ? 

9.3 ” 非 线 性 方程 组 的 迭代 求解 


类 人 于 单 变量 的 方程 及 线性 方程 组 的 求解 ,用 和 迭代 方法 可 以 求 更 加 复杂 
的 非 线性 方程 组 的 解 . 


9.3 非 线性 方程 组 的 选 代 求解 89 


给 定 非 线 性 方程 组 
Cr Tn) 一 0 
| So (12) 


fxs +Tn) 一 0 


XI 一 gir Ta) 
二 = gn (Xi To) 
X= g(x) {13) 
其 中 ,x 为 n 维 列 向 量 (zz ,8 一 ( gi1(X),… ,ga《(X)) 为 n 维 列 向 量 
函数 , 由 上 式 即 确定 了 一 种 选 代 格 式 
XI = gCX"), n= 0,1, {11) 
由 于 非 线性 方程 组 (13) 可 能 有 许多 解 ( 甚 至 有 无 穷 多 个 解 ), 因 此 对 它 的 
求解 比 线性 方程 组 的 求解 要 面临 更 多 的 挑战 . 如 如 何 求 出 所 有 的 解 ,如何 求 出 
某 一 特定 的 解 ,如 何 选取 恰当 的 迭代 格式 ,如 何 保证 选 代 收 敏 较 快 , 等 等 .我们 
不 打算 对 此 做 详细 的 探讨 , 仅 提 出 一 些 问题 供 读者 思考 - 
问题 1 设 x* 是 方程 组 (13) 的 一 个 解 , 则 g(x) 在 x* 附近 近似 线性 化 的 
方程 组 是 什么 ? 
问题 2 在 什么 条 件 下 ,只 要 初 值 充分 千 近 (13) 的 一 个 解 x” , 则 选 代 
(14) 一 定 收 伍 到 x”? 
问题 3 在 什么 条 件 下 ,无论 初 值 如 何 靠 近 (13) 的 解 x” , 选 代 (14) 都 不 
收 铺 到 x"? 
问题 4 你 能 对 选 代 的 收敛 速度 说 点 什么 ? 和 迭代 的 收敛 速度 与 什么 有 关 ? 
问题 5 给 定 初 值 z ,将 g(x) 在 x* 附近 近似 线性 化 ,你 能 否 帆 此 给 出 一 
个 选 代 格式 ,并 给 出 选 代 收 化 的 条 件 ? 
问题 6 你 能 否 构 造 一 些 其 它 的 选 代 格 式 ,并 用 实例 将 它 同 问题 5 中 的 
格式 的 由 敛 性 及 收敛 速度 做 比较 ? 
问题 7 在 用 过 代 法 解 方 程 时 ,什么 是 线性 与 非 线 性 之 间 本 质 的 相似 之 
处 与 差别 ? 


将 它 改写 成 等 价 的 方程 组 


或 
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附录 Mathematica 程序 
1. 给 定 初 值 zo 及 和 迭代 函数 f(z) ,和 连 代 nn 次 产生 相应 的 序列 


[terate[f_,x0_.,n_Integer]: = 
Module[ {t = {},i,temp -一 x0}, 
AppendTolt,temp |; 
For[i = 1,i <=n,i-+t,temp = f[temp|; 
AppendTolt,temp | ]; 
4 


f[x_]: = (x+ 2/x)/2; 
lterate[f ,1. ,10] 


2. 由 和 迭代 公式 (5) 产 生 的 和 迭代 序列 


NTiterate[E_,x0_,n_Imnteger] : = 
Module[ 
{i,var = x0,t — {},h}, 
h[x_] = Dt[gLx],x]; 
Forfi = 1,i 一 一 mi 十 十 ,AppendToLt,yar]; 
IfThLvar]! = 0,var = N[var — gLvar |/hLvar | ,20j, 
Print[”Divided by Zero after" ,i, 
"sg iterations.” |]; 
Break[]]]; 


g[Lx_] :一 X 3— 2; 
NTIterate[g,1,10] 


附录 Mathematica 程序 91 


3. 对 给 定 的 矩阵 MM ,数组 了 和 初始 向 量 x? ,由 过 代 (9) 给 出 的 近代 结果 


LSIterate[m_,fT_List,f0_List ,nm_Integer] : 一 
Modulef 
{fi,var = f0,t = Table[ {}, {i,n}]}. 
Forfi 一 1 一 一 ni 十 十 ,tLf 门 ] = var;yvar = m. var + ff]; 
t 
] 


m= {{0.2,0.3),{0.4,0.2}};f = {1,1};f0 = {0.0}; 
LSIterate[ mf ,f0,20] 


4. 由 迭代 (10) 产 生 的 迭代 向 量 列 


Jacobiterate[a_,b_List,x0_List,n_lnteger]: = 
Medule[ 

{ad = Length[a],i,j,k,var = varl = x0}, 
Forfi = 1,i<= ad,i 二 ,Iffaf[i,i]] = = 0， 

Print[”*af"” ,i ,” ,i,*] = 0.”"];Abort[]]]; 
For[i 一 1,i 一 一 ni 十 十 ,Print[var]; 

For[j 一 1j < 天 一 ad,j 十 十 ， 

vari[ [jj] = N[ OILY 一 Sum[a[Lj,k]] x varLCk]], 
{k,aqd} 1)/a[Li,j]] + var[LjJ],20] 

]; 

var 一 YaT1; 

]; 

J 


县 一 {{1,2, Ss 2},{1,1,1},{2,2,1}};b {1,1,1}) ;x0 一 {0,0,0}; 
Jacoblterate[a ,b,x0,10] 
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5, 由 迭代 (1) 产 生 的 选 代 向 量 列 


Seidellterate[a_,b_List,x0_List,n_Integer |: 一 
ModuleL 
{ad = LengtbLa],i,j,k,vyar 一 x0)}、 
For[i 一 141. 一 一 ad,ji 十 十 ,If[aL5i, 麻 ] 一 一 0， 
Print[L”a[” ,ij”,”,i”] 一 0.”"];AbortL]]]; 
For[i 一 1)i< 一 一 ni 十 十 ,Printtvyar]; 
For[j 一 二 jj 一 = 一 ad,j 十 十 ， 
var[Dj]] 王 NECbLDj]] — Sum[a[ [j,kj] * varLCk]], 
{ks,ad} ])/aL[j,j]] + varL[jjj,20] 
J; 
]; 
] 


a= {12, 0 1:1},{1,1,1},{1,1, 和 2}};b={1,1,1};x0= {0,0,0); 
SeideiIterate[a,b,x0,10] 
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实验 十 寻 优 


10.1 光 的 折射 定律 


光 在 同一 介质 中 沿 直线 传播 , 走 的 是 路 程 最 短 的 路 线 . 光 在 反射 时 服从 反 
射 定律 ,入 射 角 等 于 反射 角 , 这 也 是 从 一 点 出 发 经 过 反射 后 到 达 另 一 点 的 最 近 
的 路 线 . 看 来 , 光 在 选择 路 线 上 是 很 “聪明 ”的 ,似乎 总 是 选择 路 程 最 短 的 路 线 . 
但 是 , 光 从 一 种 介质 进入 另 一 种 介质 时 , 却 不 走 直 线 而 走 折线 ,没有 沿 着 路 程 
最 短 的 路 线 运行 . 是 不 是 光 变 “ 像 * 了 呢 ? 如 果 我 们 仍然 认为 光 是 聪明 的 而 决 不 
会 伍 傻 事 ,就 可 以 设想 :假如 光 在 不 同 介质 中 的 速度 不 同 ,那么 ,在 速度 小 的 介 
质 中 少 走 一 些 路 程 ,在 速度 大 的 介质 中 多 走 一 些 路 程 ,走出 一 条 拆 线 ,即使 总 
路 程 略 有 增加 ,但 总 时 间 仍 然 可 能 减少 ,仍然 可 能 是 划算 的 . 这 样 看 来 , 走 折线 
不 但 不 傻 , 反 而 可 能 是 绝顶 脱 明 的 表现 : 走 一 条 最 节省 时 间 的 路 线 ! 到 底 走 怎 
样 的 路 线 才 能 使 时 间 最 短 呢 ? 由 物理 实验 知道 , 光 的 折射 服从 折射 定律 :入 射 
角 的 正弦 与 折射 角 的 正弦 之 比 为 常数 这 是 否 就 是 最 省 时 间 的 路 线 呢 ? 下 面 就 
来 研究 这 个 问题 ， 

虽然 光 是 在 三 维 空间 中 发 牛 折射 ,但 可 以 将 这 个 问题 简化 为 下 而 的 平 而 
上 的 质点 的 运动 问题 : 

问题 1 直线 /将 平面 区 域 分 成 两 部 分 , 人 4,B 分 别 是 这 两 区 域内 的 两 点 . 
一 运动 质点 在 两 部 分 区 域内 的 运动 速度 分 别 是 4,v ,该 质点 要 从 4 点 运动 到 
B 点 , 沿 怎样 的 路 线 运 动 才 能 使 所 花 的 总 时 间 最 短 ? 


图 10 一 1 


94 实验 十 寻 优 


直线 7 (代表 两 种 介质 的 分 界面 ) 与 4,B 点 的 相互 位 置 关系 可 以 刻 划 如 
下 : 作 4O 上 :于 口 , BDP 1 1 于 D. 议 OO 为 原点 ,OD 为 + 轴 正 方向 、 O04 为 > 
轴 正 方向 建立 直角 坐标 系 . 设 4,B 的 坐标 分 别 是 (0,a), (ce, 一 5) , 则 a,6b,c 
三 个 正 实数 完全 刻 划 了 4,8B,i 的 相互 位 置 关系 . 

质点 要 从 4 运动 到 召 ,必然 要 经 过 ! 轴 上 的 某 一 点 P(x,0) .质点 从 和 4 到 
P 显然 应 走 直 线段 4P ,从 了 到 B 显然 应 走 直 线段 PB . 很 容易 求 出 二 与 了 之 
间 的 函数 关系 式 ， 


即 
VT vtc— zx 
uw 


到 


Tf 


这 样 , 问 题 就 归结 为 求 x 的 值 xz* 使 函数 了 = f(z) 达到 最 小 值 . 容易 看 出 , 式 " 
应 在 区 间 [0,c] 范围 内 . 

实验 原理 和 方法 

一 般 的 , 设 y 二 f(x) 是 定义 在 某 个 区 间 [a,5] 上 的 一 元 函数 ,要 求 最 佳 
点 rr" E [a,b] 使 f(x') 达到 该 区 间 内 我 们 所 需要 的 最 佳 值 (最 大 值 或 最 小 
值 ), 可 以 采用 以 下 方法 . 

1. 均匀 搜索 法 

区 间 [a,5] 内 有 无 穷 多 个 值 ,我 们 不 可 能 将 它们 一 一 穷 举 , 求 出 最 佳 点 . 
但 可 以 将 问题 离散 化 ,选择 一 个 步 长 4 > 0 ,一 步 一 步 跳 着 走 , 依 次 计算 z = 
aa 十 da 十 24,… 所 对 应 的 y 值 ,从 中 找 出 最 佳 的 只 二 f(a 十 4) ,把 它 对 
应 的 zx, 二 a 十 4 作为 最 佳 点 +” 的 近似 值 . 则 误差 lz* 一 二 | 过 4. 

显然 , 取 4 越 小 , 则 精确 度 越 高 ,但 计算 量 也 就 越 大 . 特别 在 实际 应 用 的 情 
况 下 ,函数 关系 式 y = f(x) 可 能 预先 不 知道 ,由 x+ 的 每 一 个 值 求 出 对 应 的 y 
值 都 需要 作 试 验 , 花 费 一 定 的 成 本 ,为 了 节省 成 本 更 希 刻 工作 量 尽 量 小 ,希望 
只 试验 少数 点 的 y 值 就 能 得 出 最 佳 点 .我们 看 到 ,均匀 搜索 法 在 离 7* 还 很 近 
的 时 候 也 按 同样 的 步 长 2 ,这 是 在 浪费 工作 量 . 应 当 在 一 开始 选取 较 大 的 步 
长 进行 比较 粗糙 的 搜索 , 求 出 最 佳 点 x" 的 一 个 粗粮 的 近似 值 . 再 在 这 个 近似 
值 附近 用 较 小 的 步 长 搜索 到 更 好 的 近似 值 . 这 样 一 步 步 提 高 精确 度 , 而 又 能 减 
少 工作 量 的 浪费 , 因此 ,有 以 下 方法 . 

2. 0. 618 法 

在 区 间 [4a,5] 内 插入 两 个 分 点 

Xi=6— 0.6186—a)=at 0.382B — a), x, = a+ 0.818(8 Ca) 

分 别称 为 区 间 的 0.382 点 和 0. 618 点 . 也 就 是 说 ;这 两 个 分 点 到 区 间 左 端点 的 
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距离 分 别 是 整个 区 间 长 度 的 0. 382 倍 .0. 618 售 . 这 两 个 分 点 将 区 间 分 成 3 个 
小 区 间 . 求 出 y 在 这 两 点 的 值 = f(z1) ,ys 二 f(x;) 进行 比较 , 求 出 其 中 较 
好 的 一 个 . 如果 yy, 比 y; 好 , 则 可 以 认为 最 佳 点 x* 在 与 相 邻 的 两 个 小 区 间 
的 范围 [ec,z*] 内 ,而 与 zi 不 相 邻 的 小 区 间 (zx26] 可 以 去 掉 不 考虑 . 剩 下 的 区 
间 [a,zz] 的 长 度 缩 小 为 原来 长 度 6 一 a 的 0.618 信 . 而 且 , 这 个 区 间 [er 
内 已 有 一 点 x 的 函数 值 y 一 f(x) 是 知道 的 .并且 

ZL 一 4 -0.382 

Tos—a 0. 618 
也 就 是 说 z 是 新 区 间 [4,x2] 的 0.618 点 . (这 是 由 于 我 们 一 开始 就 选择 0. 618 
使 它 满足 条 件 1 一 0. 618 = 0. 382 一 0.618? , 即 0. 618 是 方程 1 一 + = 的 
正 实 根 , ) 只 要 再 对 该 区 间 的 0.382 点 x 二 a 十 0.382(x; 一 4) 求 出 对 应 的 孙 
数值 y = f(xz3) ,将 yya 比较 优 劣 ,就 可 以 重复 前 面 的 步骤 将 z* 所 在 的 区 
间 再 次 收缩 . 类 似 地 ,如 果 在 一 开始 是 y: 比 y, 好 , 则 去 掉 与 zs 不 相 邻 的 小 区 
间 [a,zr) ,在 [zx1,6b] 中 继续 搜索 x ,此 时 xz 是 新 区 了 间 [x1,5]] 的 0. 382 点 ,只 
要 再 对 这 个 区 间 的 0. 618 点 zx; 一 十 0,618(6 一 z+) 求 对 应 的 函数 值 y;, 与 
yz 进行 比较 ,就 可 以 将 搜索 区 间 再 次 缩小 . 

重复 上 述 过 程 ,每 次 只 多 求 一 个 点 的 中 数 值 ,就 可 将 搜索 区 间 缩 小 到 上 一 
次 的 0. 618 倍 . 误差 随 工 作 量 的 增 扣 成 指数 规律 快速 减少 . 

3. 求 导 法 

如 果 能 够 求 出 函数 y= f(z) 对 xz 的 导 函 数 y 二 (7z) . 求 出 使 y = 二 0 的 
+ 二 Xx" 值 ( 即 x” 是 方程 六 (x) = 9 的 根 ), 或 求 出 使 y 不 存在 的 + 二 x+“ 值 . 
如 果 函 数 了 在 x 一 天 处 连续 , 且 当 z<z 时 了 < 一 0, 当 工时 了 盖 0， 
则 x 二 zx, 是 极 小 值 点 . 类似 地 可 求 出 极 大 和 值 点 . 

如 何 求 出 户 (r) = 0 的 根 ? 可 以 用 实验 一 或 实验 九 所 介绍 的 方程 求 根 的 
方法 . 比如 ,可 先 在 区 间 内 选 一 点 zx。 作为 +* 的 最 初 的 近似 值 , 将 函数 一 
Fr) 在 xn 附近 近似 地 当 作 二 次 画 数 ,用 这 个 二 次 函数 的 最 小 值 点 zx, 作为 比 
zn 更 好 的 近似 值 . 这 样 来 不 断交 近 z* . 具体 方法 如 下 : 

求 出 y= 二 广 (xo) .如 果 和 二 0 , 则 lzxo 可 能 已 是 极 值 点 xz*. 设 yo 关 0., 如 
果 能 够 进一步 求 出 户 (r'y 在 zo, 的 导数 ( 即 (x) 的 二 阶 导数 ) 值 y 腻 兴 天 0， 
将 P(z)》 在 xxo 附 正太 地 当 作 > 的 一 次 函数 , 即 认 为 (x) 二 ys 十 
Cr 一 ro 则 :有 近似 解 


一 0. 618 


用 xz 代替 ro ,给 二 4 并 程 直到 求 出 足够 满意 的 极 值 点 - 
如 果 不 容 易 求 六 rz) 的 二 阶 导数 值 ,可 用 下 面 的 办 法 将 f(x) 在 二 
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附近 近似 地 展开 成 二 次 函数 : 先 求 出 m = Aro) ,一 也 (zo) .如 果 y6 关 0， 
则 在 ze 附近 另 选 一 点 re 十 4 ,计算 yi = f(xo 十 红 ) 的 值 . (并且 可 在 和 <0 
时 选 &>>0 ,在 yi 守 0 时 选 4 过 0 ,使 zo 十 4 向 极 小 值 点 x* 靠近 , > 确定 二 次 
函数 g(x) 一 az: 十 bx 十 ¢ 的 系数 a,5,c 使 满足 条 件 

glX0) = yorg (zxo) = 2czo Hh = 8rd)=y 
如 果 a 这 0 , 则 可 将 二 次 函数 g(x) 的 最 小 值 点 


二 6 
2(y 一 3 一 Gyo》 

作为 最 小 值 点 的 更 好 的 近似 值 . 用 z 代替 ro ,重复 刚才 的 过 程 .如 果 a < 之 0， 
则 二 次 函数 g(x) 的 最 小 什 只 能 在 区 间 端 点 取得 . 此 时 可 以 直接 用 re 十 4d (或 
工 十 24 ,x 十 34，,… 等 ) 代 替 .r ,重新 进行 刚才 的 过 程 . 

可 以 想到 ,即使 不 容易 求 出 /Cx) 的 导数 ,也 可 以 在 ze 附近 将 (x) 近似 
地 当 作 二 次 函数 ,用 这 个 二 次 函数 的 最 小 值 点 x 作为 z* 的 更 好 的 近似 值 . 为 
此 , 需 训 在 rz 附近 另 取 两 个 点 并 十 好 并 十 帮 , 求 出 royze 十 dre 十 加 对 应 的 
? 值 wy 确定 二 次 函数 SCT) 一 az 十 or 十 < 的 系数 ea;p,c 使 ECzo) 一 
yo sg To Ad) = ,RT di) = yy. 

4, 用 数学 软件 求 极 值 

数学 软件 很 多 . 议 Mathematica 为 例 : 

不 妨 先 画 出 函数 y = f(z) 在 区 间 [a;5j] 上 的 图 象 ,观察 升降 变化 , 找 出 
极 值 点 的 大 致 位 置 c 作为 初始 值 . 再 在 这 个 初始 值 附近 寻找 极 值 点 . Mathe- 
matica 语句 格式 为 : 


一 Xo 


Piot[f ,{x,avb)] 
FindMinimum[f, {x,c}] 


下 面 用 以 上 方法 求 问题 1 的 解 , 即 求 函 数 工 二 f(x) 在 区 间 [0,c] 内 的 最 
小 值 . 并 且 验 证 从 4 到 吾 最 省 时 间 的 路 线 的 确 满 足 光 的 折射 定律 ， 

容易 看 出 , 当 abc 固定 之 后 ,如 果 将 x,v 同时 扩大 或 者 缩小 相同 的 倍 
数 ,不 会 改变 最 小 值 点 z+" .也 就 是 说 , ** 只 与 x 与 v 的 比值 有 关 . 故 在 以 下 总 
是 设立 一 1 , 面 zx 表示 的 是 两 种 介质 中 的 速度 之 比 . 


(1) 任 意 给 定 a,5,cwt 的 值 . 分别 用 均匀 搜索 法 和 0,618 法 求 使 最 小 的 
zx* 值 . 比较 这 两 种 方法 达到 同 祥 的 精确 度 所 花费 的 工作 量 的 大 小 .再 用 数学 
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软件 求 出 XY” ,与 前 面 两 方法 求 出 的 xX" 进行 比较 . 

求 出 XY" 的 近似 值 之 后 ,就 得 到 了 点 P(x* ,0) 的 位 置 , 从 而 得 出 了 最 省 时 
闻 的 路 线 4APB .为 了 验证 这 条 最 佳 路 线 是 否 符合 光 的 折射 定律 ,需要 对 求 出 
的 点 卫 计 算出 入 射 角 i 与 折射 角 r 的 正弦 ,过 忆 点 作 红 的 径 线 ( 即 法 线 ) 户 , 则 
1? 分 别 是 AP,PB 与 p 所 赤 的 锐角 . 


2 a El sinr= 2 -x 
14P Vaya [a 


用 这 两 个 公式 可 内 工 ” 计算 出 sin 与 sin > ,进而 计算 出 它们 的 比 . 

保持 # 不 变 ( 即 介质 不 变 ), 比 如 取 z 一 15 或 1.3. 改 变 wspe ,以 得 和 到 从 
小 到 大 若干 组 (比如 8 组 ) i,r 的 值 . (为 此 ,可 以 在 固定 2 二 的 同时 让 上 ec 从 小 到 
大 取 不 同 的 值 , 再 在 固定 c< 的 同时 减 小 G4,5.) 对 每 一 组 a,bsc 的 值 , 求 出 使 了 
最 小 的 ,以 及 相应 的 siny,sinr 的 值 以 及 它们 的 比值 .将 这 些 数 据 列 表 ，, 观 
察 sin i/sinr 是 否 因 ior 的 改变 而 改变 ,并 将 这 个 比值 与 两 种 介质 中 的 速度 比 
进行 比较 . 

换 不 同 的 z 值 ,重新 做 上 面 的 实验 .验证 :对 每 一 个 国定 的 z 值 , 当 aosc 
变化 从 而 1ir 变化 时 ,sin 1/sinr 是 否 常 数 ? 疾 与 zx 值 比较 ， 

(2) 试 用 求 导 法 得 出 +" 应 满足 的 条 件 .根据 这 个 条 件 , 由 给 定 的 4,6,c su 
值 求 工 ” 值 


虽然 人 类 很 早 就 发 现 光 从 一 种 介质 进 人 另 一 种 介质 时 改变 方向 ,发 生 折 
射 . 人 们 做 了 很 多 的 实验 , 测 出 了 光 在 折射 时 的 人 射 角 和 折射 角 的 天 景 数据 . 
但 是 , 当 人 们 试图 从 这 些 数据 中 发 现 和 射 角 和 折射 角 之 间 所 满足 的 函数 关系 
时 , 却 过 到 了 很 大 的 出 难 . 公元 140 年 ,希腊 天 文学 家 托 勒 密 曾 经 认为 ,人 射 角 
i 与 折射 角 r 成 正比 ,并 且 用 实验 方法 计算 出 光 在 空气 水、 玻璃 这 三 种 介质 中 
相互 进入 时 7 与 i 的 比值 .但 是 他 所 计算 出 来 的 这 些 比 值 ,只 对 于 比较 小 的 入 
射 角 才 大 致 相符 ,而 当 入 射 角 增 大 时 就 不 符合 了 . 比如 ,下 面 是 一 组 光 从 空气 
进入 玻璃 时 人 射 角 和 折射 角 的 数值 表 . 


40 60 
19.6 | 25.2 | 30.7 3 40. 6 
1.59 | 1.63 | 1.71 | 1.81 |1.97 


由 表 中 数据 可 以 看 出 , 当 i 变化 时 i/r 的 值 并 没有 保持 不 变 ,而 是 随 着 i 
的 增 大 而 逐渐 增 大 . 那么 ,到 底 光 的 人 射 角 与 折射 角 之 间 具 有 怎样 的 函数 关系 
呢 ? 人 类 为 解决 这 个 问题 经 历 了 长 达 一 千 多 年 的 时 间 . 直到 1621 年 ,荷兰 数学 


nes apm ep Oo 
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家 斯 涅 尔 CW. Snell) 才 终于 找到 了 人 射 角 与 折射 久之 赣 的 正确 的 函数 关系 ， 
这 就 是 : 

人 射 第 的 正 艾 与 折射 角 的 正 艾 成 正比 . 即 : sin i/sin 7 一 n 是 常数 . 

任何 人 都 很 容易 由 实验 数据 验证 斯 涅 尔 的 这 个 定律 的 正确 性 . 比如 ,读者 
可 以 自己 对 上 面 的 表 中 的 数据 验证 这 一 定律 ,并 求 出 比例 常数 了 .但 是 ,斯 混 
尔 怎 么 会 想到 要 去 验证 人 射 角 与 折射 解 的 正弦 的 比 是 理 常 数 呢 ? 这 可 真 不 是 
一 件 容 易 的 事情 ,要 不 然 人 类 怎么 会 经 历 了 一 千 多 年 才 想 到 这 一 点 呢 ? 

但 如 果 换 一 种 思路 ,猜测 光 走 的 是 最 节省 时 间 的 路 线 . 问题 就 归结 为 求 
汞 数 


ye CE 


UV 


的 最 小 值 点 . 
了 对 工 的 导 画 数 
me le 
u Vrta vvle— rz) + ulPA| wvIPB| 


sin LOAP sn/DBP 

当 z 在 区 间 (一 co,ce) 内 增 大 时 , sin 人 LOAP 单调 递增 , sin 一 DBP 单调 递 
减 , 因 面 户 (z) 单调 递增 . 

dT sinAOA4P _ sin/DBP 

i 
有 唯一 的 解 += 二 +z ,0 之 x" 之 c. 当 < 之 xX" 时 六 (Xx) 之 0 ,了 递减 ; 当 x 放 
x" 时 广 (z) 沁 0 ,了 递增 .可 见 当 xz 二 x" 时 工 最 小 . 面 此 时 PCr" ,0) 点 满足 
的 条 件 


f(r*) 0 即 是 


其 中 ir 分 别 是 的 法 线 方向 与 P4,P5 的 夹 角 .如果 4PB 是 光 从 A 到 B 的 
路 径 , i,r 就 分 别 是 人 射 角 和 折射 角 . 这 与 实验 得 出 的 光 的 折射 定律 恰好 吻 
合 .这 说 明光 的 确 是 走 的 最 节省 时 间 的 路 线 . 

光 总 是 沿 着 最 节省 时 间 的 路 线 传 播 ,这 一 原理 称 为 费 尔 马 (Fermat) 
原理 . 


Sin 如 
人 二 一 二 nn 
sinr 了 


snLOAP _ sinZDBP _ 
uu Tv 


10.2 奔 向 最 优点 


问题 2 设 4,,4,,4; 是 平面 上 的 三 个 不 同 的 点 . 在 平面 上 求 一 点 已 ,使 
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它 到 这 三 个 已 知 点 的 还 离 之 和 s = |P4,| 十 1P4:| 十 |P4;| 最 小 . 
在 平面 上 建立 直角 坐标 系 . 设 已 知 点 肌 ; 的 坐标 为 (41,8;) (i 二 1,2,3)， 
所 求 点 书 的 坐标 为 (x ,yx). 则 


PR 


Ve at yb Mr a yb) 

我 们 的 任务 就 是 要 求 这 个 二 元 函数 * = f(x,y) 的 最 小 值 点 P* (x* ,y")， 

先 介绍 一 种 用 力学 模型 来 解 这 个 问题 的 方法 :假想 将 三 个 已 知 点 的 位 置 
4 ,4:,4: 按 尺寸 画 在 一 个 平 的 薄板 上 ,在 4,,4,,4: 三 点 各 控 一 个 小 洞 . 取 三 
根 长 度 相同 的 细 线 (其 长 度 工 大 于 41,4,,4; 两 两 之 间 的 距离 ). 将 三 根 线 的 
一 端 控 在 一 起 作为 P 点 的 位 置 , 另 一 端 分 别 从 三 个 洞 Al,A, A; 中 从 上 到 下 
穿 出 ,分 别 系 在 质量 相等 的 三 个 重 物 上 . 让 薄板 保持 水 平 , 三 个 重 物 自由 下 垂 ， 
并 假定 细 线 可 以 在 洞 中 无 摩擦 地 滑动 . 现在 要 问 : 当 三 个 重 物 静止 不 动 时 ,三 
条 线 的 公共 端点 书 的 位 置 满足 什么 条 件 ? 


设 三 个 重 物 的 质量 都 是 六 .首先 ,由 力学 原理 ,系统 处 于 平衡 位 置 时 ,三 
个 重 物 的 总 势能 达到 最 小 值 . 以 平板 所 在 位 置 的 高 度 为 0. 则 第 i 个 重 物 的 
重心 高 度 及 == |PA,| 一 工 < 之 0 ,其 势能 EE 二 mgh; .三 个 重 物 的 总 势能 为 

E=mgh, 十 meh, + meh, 
一 (|P4,| 十 |P4,| 十 |P4:|)mg — 3mgL 

由 于 mg 及 工 都 是 常量 ,五 最 小 当 且 仅 当 :一 |P4, | 十 |P4:| 十 |P4:| 最 小 . 
因此 ,系统 处 于 平衡 位 置 时 ,了 的 位 置 P* 就 是 我 们 所 寻找 的 使 ; 最 小 的 点 . 

另 一 方面 ,系统 处 于 平衡 位 置 时 , P 点 受 的 合力 为 0. 先 假设 P 点 的 平衡 
位 置 P' 与 41,4,,A; 三 点 都 不 重合 . 则 已 点 只 受到 来 自 三 条 线 的 拉力 五 ， 
,下 ,其 大 小 相等 ,等 于 每 个 重 物 的 重量 mg ,其 方向 分 别 指向 4 ,4:,4: 三 
点 . 三 个 大 小 相等 的 力 ,FF;, 太 ,平衡 的 条 件 为 :这 三 个 力 两 两 的 夹 角 都 等 于 
120" . 也 就 是 说 ; 线 眉 PA1,PA,,PA, 两 两 的 夹 角 等 于 120° . 事实 上 ,只 要 三 
角形 和信 A14s4; 的 三 个 内 角 都 小 于 120° ,在 三 角形 内 就 存在 点 了 满足 这 一 条 
件 , 从 面 是 所 求 的 最 优点 . 
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如 果 A4i4s4;, 的 某 个 角 A 大 于 或 等 于 120° , 则 已 点 在 合力 作用 下 被 拉 
到 4, 点 , 4, 就 是 所 求 的 最 小 值 点 . 

以 上 的 力学 系统 是 在 重力 作用 下 自动 达到 平衡 的 . 如 果 已 点 所 处 的 位 置 
不 是 最 小 值 点 司 ”, 则 三 个 拉力 瑟 ,了 ,下 ; 的 合力 DSF@A 0. 忆 点 在 DF 的 
作用 下 总 是 向 缩小 势能 EE 从 而 缩小 s 的 方向 移动 .事实 上 ，> 1F 的 方向 是 使 
吾 下 降 得 最 人 快 的 方向 ,从 而 是 使 下降 得 最 快 的 方向 . 已 点 在 1K 的 作用 下 
最 侠 速 地 奔 向 P* 点 . 

问题 2 本 来 是 个 数学 问题 ,以 上 却 是 通过 建立 一 个 力学 模型 使 它 获得 了 
圆满 解决 . 其 中 应 用 的 力学 原理 是 :系统 处 于 平衡 位 置 时 势能 最 小 ,合力 为 零 . 
既然 是 数学 问题 ,这 个 力学 原理 应 当 可 以 翻译 成 数学 原理 ,力学 解法 应 当 可 以 
翻译 成 数学 解法 . “势能 "相当 于 目标 函数 s 二 f(z,y) ,PCz,y) 点 的 “平衡 位 
置 ?就 是 使 * 达到 最 小 值 的 点 . 现在 要 问 的 是 :“ 力 ”相当 于 数学 上 的 什么 量 ? 
“合力 ”为 零 相当 于 数学 上 的 什么 条 件 ? 

我 们 从 选 定 的 一 个 初始 点 Po(xo;yo) 出 发 . 假设 Po 与 4,,4s,4; 都 不 重 
合 , 则 在 P, 点 的 附近 ,函数 stz,y) 可 以 近似 地 看 作 一 次 函数 ， 

5Kzyy) syfzoyyo) 十 er 一 To 十 By 一 30) 
其 中 ab 是 与 zy 无 关 的 常数 .事实 上 ,a = 入 和 4 一 区分 别 是 在 (zo3o) 
点 了 对 于 zy 的 偏 导数 . 将 ryyys 的 微小 增 量 一 x0; yy 一 osCzyy) 一 
szoyyo) 分 别 记 作 As,Az,Ay , 则 
As 2s ds = aAr PAYy = Cab) * (Mr,Ay) 

其 中 ds 就 是 : 的 微分 , 当 |PoP| 很 小 时 它 可 以 代表 的 增 量 , 当 1PoP| 一 0 
时 ,“ 相 对 误差 ”(As 一 ds)/|PoP| 也 趋 于 0. ds 等 于 向 量 G 一 (ab) 与 P 记 = 
(Az,Ay) 的 内 积 . 如 果 将 G 看 作 一 个 “ 力 ”, 则 G，P 就 是 在 这 个 “ 力 ” 的 作用 
下 从 Ps 到 了 所 作 的 “ 功 ”, 它 近似 地 等 于 “势能 ”s 的 增 量 . 而 在 “ 力 ”一 G 作用 
下 作 的 功 则 近似 地 等 于 “势能 ”* 的 减少 量 . 设 向 量 G 与 Bo 户 的 方向 的 夹 角 为 
9 ; 则 s 在 Po 六 方向 上 的 变化 率 ( 即 方向 导数 ) ds/|1PoP| = 1Gleos 9 .梯度 G 
的 方向 ( 即 0, ) 是 s 增加 得 最 快 的 方向 ,这 一 方向 上 * 的 变化 率 (方向 导数 ) 就 
是 G 的 大 小 .而 9 一 180° 的 方向 ,也 就 是 一 G 的 方向 是 * 减少 的 最 快 的 方向 ， 
证 点 在 “为 ”一 G 的 作用 下 自由 运动 , 则 s 以 最 快 的 速度 减少 ,直至 一 G 二 0 或 
G 不 存在 (本 题 即 与 某 个 4, 重合 ), 则 s 就 达到 了 最 小 值 . 

问题 2 中 的 目标 函数 = |P4,| 十 1P4;| 十 |P4,| 是 三 个 函数 一 
IPA| (i 二 1,2,3 ) 之 和 ,因此 ;s 的 梯度 也 是 这 三 个 函数 的 梯度 C; 之 和 .对 于 
点 PuCzoyyo) ;函数 s, 下 降 得 最 快 的 方向 显然 是 由 已, 指向 4, 的 方向 ,而 在 这 
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一 方向 上 的 方向 导数 Jc 7 一 一 1， 可见 一 G, 是 三 训 方向 上 的 单位 向 量 . 
一 G= 一 G, 一 Gs 一 6G; 是 三 个 单位 向 量 一 Gi (i 一 1,2,3 ) 之 和 ( 即 这 三 个 
“ 力 ” 的 合力 ).， 最 小 的 条 件 是 一 G = 09. 但 三 个 单位 向 量 之 和 为 零 的 条 件 就 
是 它们 两 两 的 夹 角 为 120", 这 正 是 我 们 用 力学 模型 得 到 的 结果 . 

一 般 来 说 , 设 ， 元 函数 y = rn sx) 在 点 X。 = (coveo) 点 附近 是 
够 光 清 ,可 以 近似 地 看 作 = 元 一 次 函数 


y= fesse,) tt gi 一 cl) 十 … g(r 一 ce)》 
则 一 次 项 系数 & 就 是 y 在 X。 点 对 zx 的 偏 导数 ?之 ,1 <; < ,向 量 
9 ,2 


G= (80 一 [区 


称 为 这 个 函数 在 点 已。 的 梯度 , 沁 作 gradf .一 避 是 yy 下降 得 最 快 的 方向 . 当 y 
取 最 小 值 或 最 大 值 时 ,梯度 为 0 或 不 存在 . 我们 可 以 模拟 质点 在 “ 力 ” 一 G 作 
用 下 自由 运动 奔 铝 最 小 值 点 的 过 程 : 从 某 个 初始 点 X。 出 发 , 沿 一 G 方向 走 一 
步 ( 移 动 的 虐 离 称 为 步 长 ) 到 已 ， :再 由 P) 沿 新 的 一 C 的 方向 走 一 步 到 己 : 点 . 
这 样 沿 着 > 下降 得 最 快 的 方向 不 断 地 走 下 去 ,直到 不 能 再 使 y 减少 为 止 (C = 
0 或 不 存在 ). 这 个 方法 称 为 最 速 下 降 法 . 

在 最 速 下 降 法 中 怎样 选择 步 长 ,是 一 个 值得 注意 的 问题 . 步 长 太 大 ,可 能 
走 过 了 最 小 值 点 ,函数 值 反而 上 升 . 步 长 太 小 , 则 向 最 小 值 点 趋 近 得 太 悍 . 从 
XXX。 出 发 河 一 避 方 向 所 到 的 点 可 以 表示 为 全, 一刀 ,其 中 正 实数 4 的 大 小 代表 
了 步 长 的 大 小 (事实 上 , 步 长 = 4jG|). 我 们 可 以 将 函数 在 一 GG 方向 上 看 作 4 
的 一 元 函数 

PN = fAKo CO— AG) = Fe 一 Mg 一 MBE) 
并 且 和 希望 进一步 看 作 4 的 二 次 函数 , 求 出 使 它 取 最 小 值 的 4” .已 经 知道 
9p(0) 一 了，9(0) 一 一 (8 十 822 十 … 十 Bn’) 
只 要 再 选 一 个 6 > 0 , 求 出 (3,) 的 人 秆 ,就 可 以 求 出 一 个 二 次 函数 (和) 来 近 
似 地 代替 Pi ;使 $60) = 0), (00) = 户 (0) ,gC 加) = (Ch) . 求 出 这 个 二 
次 函数 的 极 小 值 点 4”, 以 
Ki= Xo AG= (~ Ag A'gn) 
作为 从 和。 出 发 走 到 的 下 一 点 . 再 由 X, 出 发 按 和 三 样 的 方法 走 到 下 一 点 立 ; .这 
样 一 步 一 步 向 降低 > 值 的 地 方 走 去 , 趋 近 极 小 值 点 . 


(1) 自 己 选 定 4(ca)》 (i 二 112,3) 的 坐标 . 选择 一 个 初始 的 点 
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了 Po(zoyY0) 作为 出 发 点 . 按 上 面 所 说 的 最 速 下 降 法 逐步 趋 近 最 小 值 点 已 * . 当 
已 , 与 所 有 的 4 都 不 重合 时 ,验证 P* A (fr 一 1,2,3 ) 两 两 的 央 角 是 否 都 等 于 
120°. 

利用 Mathematica 求 多 元 通 数 极 小 值 的 话 铝 


FEindMinimum[f ,{(x,x0),{y,y0)] 


求 浮 数 f(x,y) 一 了 ) V(r 一 4)? 十 (y 一 扎 )* 在 点 (x0,y0) 附近 的 最 


一 1 
小 值 点 和 最 小 值 . 注意 ,语句 中 的 z0,y0 要 输入 具体 的 数值 . 

(2) 在 平面 上 或 三 维 室 间 选 定 4 个 或 更 多 个 点 4, (i 二 1,2,3，"… ), 求 点 
P 的 位 置 使 已 到 所 有 这 些 点 的 距离 之 和 最 小 - 

《3) 在 平面 上 选 定 三 个 点 4 Cai) (i 二 1,2,3 ), 并 取 定 三 个 正 实数 m， 
(二 1,2,3), 求 点 忆 的 位 置 ,使 s 二 mlPAl| 十 mr;|PA,| 十 m3|PAs| 最 小 . 


10.3 最 小 二 乘法 


在 进行 科学 研究 和 解决 实际 问题 中 ,经 常 需要 由 自 变 量 * 与 办 变量 》 的 
若干 组 对 应 数据 (zx,,y) (1 诗人 生 nn ) 推 测 x 与 y 之 同 的 函数 关系 y 一 (7). 
为 此 ,可 以 在 直角 坐标 条 中 画 出 数据 所 代表 的 点 . 妈 果 观察 发 现 这 些 点 近似 地 
在 一 条 直线 上 ,就 可 以 认为 函数 关系 是 一 次 函数 > 二 az 十 b , 剩 下 的 事情 是 
求 出 一 次 函数 的 参数 a,65 .在 有 的 情况 下 ,虽然 数据 点 (x,,y,) 的 集合 不 在 一 
条 直线 上 ,但 其 对 数组 成 的 数据 点 (ln z ,ln y,) 的 集合 也 许 就 在 一 条 直线 上 ， 
此 时 ln y 与 jnz 之 间 成 一 次 函数 关系 jny 一 aln 工 十 袁 , 从 而 ?一 Ar (CA 一 外 
是 常数 》《〈 比 如 实验 士 的 行星 运动 的 加 速度 大 小 a 与 行星 与 太阳 的 距离 > 的 
关系 就 是 这 样 . ) 总 之 ,我 们 经 常 而 临 这 样 的 问题 : 求 一 条 直线 > = ez 十 6 经 
过 若干 已 知 的 数据 点 (x;;3,) . 问题 在 于 ,这 些 已 知 点 虽然 近似 地 在 同一 条 直 
线 上 ,但 并 不 是 精确 地 在 同一 条 直线 上 . 即使 在 理论 Fy 应 当 是 z 的 一 次 函 
数 , 由 于 测量 误差 和 别 的 偶然 因素 , (zx,y) 的 具体 数据 (zx;,y.) 仍然 有 可 能 不 
在 一 条 直线 上 . 我 们 不 可 能 找 出 一 条 直线 完全 经 过 所 有 这 些 数据 点 ,只 能 找 一 
条 直线 尽 可 能 接近 所 有 这 些 数据 点 . 每 一 个 点 (zx;,y,) 到 直线 y = ax 十 6 的 接 
近 程 度 可 以 用 非 负 实数 s, = (ax; 十 6 一 ,来 衡量 , s; 越 小 ,就 说 明 这 个 点 到 
这 条 直线 越 接 近 . 于 是 ,直线 与 所 有 的 数据 点 总 体 上 的 接近 程度 可 以 骨 

s(x6) 一 Ds 一 Dart+ 6 oy) 
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来 衡量 . 我 们 的 任务 归结 为 求 a,6 使 sla,5) 达到 最 小 值 ， 

更 一 般 的 ,如 果 数 据点 集 (xz, ,3y) 不 接近 于 一 条 直线 ,而 接近 于 某 一 类 函 
数 y 二 f(x) 的 图 象 ( 比 如 是 二 次 多 项 式 .n 次 多 项 式 、 指 数 函 数 . 对 数 函 数 
等 ), 则 所 选择 的 了 应 使 函数 

s(f) 一 Dy fr) 一 y1) 


版 最 小 值 . 用 这 样 的 f 去 拟 合 已 知 数据 点 的 方法 称 为 最 小 二 乘法 . 
仍 考虑 用 直线 y= sz 十 5 去 拟 合 数据 点 的 情形 . 注意 s(a,8) 是 a,5 的 二 
次 函数 
slab) = Ana: + 2Awab + Ab: — 2Aa — 2428 起 
其 中 


4 一 pe 4a = 2 44s 一 天 


=- Da 4 


而 SCa:,25) 对 ay;6 的 偏 导数 都 是 2 二 的 一 Wt 


殉 =2(4na 十 4 一 人)， 弱 一 2C4a 十 4 太一 4) 


要 使 xx ,5) 取 最 小 值 ,也 就 是 使 梯度 (Ep 二 (0,0) ,满足 这 一 条 件 的 a,6 


da 8 
就 是 二 元 一 次 方程 组 
Aua 二 + A = A 
0 二 A2sb = A, 
的 解 . 
Mathematica 中 有 解 二 元 一 次 方程 组 解 的 语句 ,也 有 直接 求 ;ta,5) 在 某 
个 初始 值 附 近 的 最 小 值 点 的 语句 . 更 直接 的 是 用 下 面 的 语句 


Fit[t, {1,x},x] 


得 到 一 条 直线 去 拟 合 数 据 表 + 中 的 所 有 数据 点 . 


(1) 用 下 面 的 第 一 个 语 多 产生 一 个 数据 表 t,( 其 中 Random| 产生 区 间 
[0,1] 的 一 个 随机 数 ), 再 用 第 二 个 语句 得 到 一 条 直线 去 拟 合 它 .后 面 的 语句 
是 将 数据 点 和 直线 画 在 同一 个 直角 坐标 系 中 ,观察 它们 的 接近 程度 . 
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t= Table[ {x 十 Random[ ],0. 1x 十 Random[ ]}, {x,0,100}] 
tl = FitLt, {1,x},x] 

p = ListPlot[t] 

pl = Plot[t1, {x,0,100}] 

Show[p ,pb1] 


(2) 用 语句 12 二 Fit[t, {1,xX,X”2),xXj] 求 出 XX 的 二 次 多 项 式 t2 去 拟 合 表 上 
中 的 数据 ,并 画 出 图 象 , 它 与 直线 有 多 少 区 别 ? 说 明 什 么 问题 ? 


lol 
(3) 用 以 下 语 向 求 出 使 函数 s(a,6) 一 2) (Cari 十 5 一 74)? 达到 最 小 值 的 
上 一 1 
ao0 .注意 Tv 分 别 是 数据 表 t 中 第 上 对 数据 的 第 一 个 数 和 第 二 个 数 , 在 下 面 
的 语句 中 分 别 用 [Lk,1j],tLLk,2]] 表 示 . 由 于 二 次 函数 sba,68) 的 最 小 值 点 
是 唯一 的 ,我 们 可 以 (4,5) 的 任 一 组 值 作为 初始 值 ,比如 选 (0,0). 


s[a_,b_]:= Sum[ (ax¢tffKk,11i + bo tk,21])° 2,{k,1,101};] 
FindMinimuml[s[a,b}, {a,0},{b,0)] 


将 求 得 的 最 小 值 点 (a* ,2" ) 与 (1》 中 求 得 的 一 次 函数 的 系数 相 比 较 , 看 
是 否 吻 合 . 在 最 小 值 点 附近 取 一 些 别 的 点 ,计算 它们 对 应 的 s(a,5) 值 ,与 
sta" ,5b ) 相 比 较 . 

(4) 用 下 面 的 语句 求 出 s(a,6) 的 多 项 式 展 开 式 s, 以 及 s 对 4,5 的 偏 导 数 
81,82 .再 求 出 方程 组 &g1 = 0,82 一 0 的 解 , 与 前 面 的 结果 相 比 较 . 


s = Expand[s[a,b]] 

g1 = DLs,a] 

£2 = DLs,b] 

FindRoot[ {81 == 0,g82 == 0),{a,0},{b,0}] 


实验 十 一 最 速 降 线 


问题 ”4, 刀 是 重力 场 中 给 定 的 两 点 , 4 点 高 于 避 点 .一 个 在 4 点 静 赴 的 
质点 在 重力 作用 下 沿 着 怎样 的 路 线 C 无 摩擦 地 从 4 点 滑 到 已 点, 直 能 使 所 花 
费 的 时 间 了 最 短 ? 

使 工 最 短 的 曲线 C 称 为 最 速 降 线 . 


11.1 时 间 的 计算 


不 妨 以 4 为 原点 .以 向 下 的 方向 为 y 轴 的 正方 向 ,在 4B 与 y 轴 所 在 的 平 
面 内 建立 平面 直角 坐标 系 ,使 刀 点 的 坐标 a 和 坐标 A 都 是 正 实数 .对 从 4 
到 B 的 任 一 条 曲线 y 二 f(z) (0 二 xz 扫 a ), 我 们 来 计算 质点 沿 此 曲线 由 4 到 
B 所 花 的 时 间 工 . 

由 4 到 的 最 短路 径 是 直线 自 y= 和 x (0 忒 z+< 芝 a ). 质 点 沿 直线 段 4B 
的 运动 是 匀 加 速 运动 . 质点 在 A,B 两 点 的 速度 分 别 是 

za4 一 0， mp 一 v2pgh 

质点 在 整个 直线 段 4B 的 平均 速度 5 二 (v4 十 vs)/2 一 V28 有 /2 . 总 时 间 


二 二 14B| _ /2(Ca’ 十 各 
En 


质点 洛 着 曲线 Cy 二 f(x) (0 所 z+ 所 a) 从 4 到 互 所 花 的 时 间 工 一 工 (C) 
依赖 于 C 的 选取 . 质点 在 曲线 上 坐标 为 (z,y) 的 点 了 的 速度 为 vp 一 V28g8y. 
(为 了 计算 方便 起 见 ,也 可 取 ve 二 Vy ,这 样 使 质点 沿 每 条 路 线 运行 的 总 时 
间 都 扩大 了 V3& 倍 , 原 来 的 最 速 降 线 仍然 是 最 速 降 线 . ) 

为 了 计算 总 时 间 工 ,可 在 z 的 取 值 区 间 [0,a] 内 插 人 ?一 1 个 分 点 
Ai 之 kn 一 1) 使 0 二 Xz 之 区 之 XT < 了 之 XX, 二 a. 这样 就 将 
[9,a] 分 成 # 个 小 段 Ai 二 [xs_1,7x4j ,每 小 段 长 度 dd 二 x 一 x ; .通常 可 设 
zsT2os… ozo_1 将 区 间 [0,4]n 等 份 , 即 所 有 的 di 相等 ,等 于 a/n , 面 7 = ka/n 
对 0 有 nn 成 立 . 但 如 果 有 曲线 用 参数 方程 

X=7u), y= yu), uw € [uv] 
给 出 ,并 且 了 是 xz 的 增 函 数 , 则 可 在 zx 的 变化 区 间 [x。,vj 中 插入 一 1 个 分 点 
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i 二 6 十 kv 一 Uo)/n《1 扩 nn 一 1 ) 将 这 个 区 间 分 成 4 等 份 , 则 在 x 变化 
区 间 [0,a] 得 到 相应 的 nn 一 1 个 点 志 二 (44) (1 大 坊 nn 一 1), 将 [0,4] 分 
成 =” 小段. 

将 工 的 变化 区 间 [0,a] 分 成 二 个 小 段 之 后 ,曲线 C 相应 地 被 分 成 小段 
Ci 一 Fr) (ri 和 TT ,1 雪上 扫 2 ,对 每 个 0 志和 , 记 二 (zi)， 
记 A; 是 坐标 为 zx) 的 点 .注意 % 一 0 和 2 一 天 不 能 改变 ,4 一 4 ,44, = 
B 是 固定 点 . 而 其 余 4 及 其 纵 坐 标 y; 随 着 曲线 C 的 不 同 选取 而 改变 . 曲线 性 
被 分 成 的 每 小 段 Ci 的 起 点 和 终点 分 别 是 4,-_1 和 A. 如果 有 比较 大 ,并 且 每 个 
级 都 比较 小 , 则 Ci 可 近似 地 看 成 从 4A- | 到 4 的 直线 段 , 质点 在 A1_1,A; 两 点 


的 速度 分 别 是 N28gy_1，N2g8yY4 ,在 直线 段 A_1A 内 的 平均 速度 为 
《V2g8ye! 十 V2g8?672 ,质点 经 过 这 条 直线 段 的 时 间 是 


交 ， 2 Yece 十 (3 一 


V 2gY 十 V28W-i 


总 时 间 了 近似 地 等 于 
i 


/1+ Oy 
了 lim 了 = | Vd 
可 用 求 原 函 数 的 方法 或 数值 方法 (如 梯形 公式 或 辛普森 公式 ) 求 出 了 的 值 ， 
如 果 曲 线 C 由 参数 方程 了 一 r(a),y 一 ya ,zx E€ [uosv] 给 出 , 且 x(x) 
是 区 间 [wo。,v] 上 的 单调 递增 可 微 函 数 , 则 


TEST 
人 Ey 第， 


而 准确 的 总 时 间 


(1) 对 从 轴 到 如 的 以 下 曲线 CC :(i) 直 线段 , (二 ) 辕 弦 ,(iii) 抛 物 线段 ,计算 
时 间 玉 的 近似 值 . 通 过 比较 ,看 质点 活着 上 述 哪 一 种 曲线 人 从 皇 到 如 所 花 的 
时 间 更 少 . 注意 从 A 和 AA 到 BB 的 园 张 和 抛物 线段 都 不 是 唯一 的 . 体 可 自己 任 选 一 
条 . 并且 可 以 尝试 不 同 的 选择 方案 ,看 哪 一 种 更 好 . 

你 能 否 猜 出 另 一 种 册 线 ,使 对 间 进 一 步 减少 ? 

(2) 直 线段 4 号 的 中 点 邮 的 坐标 为 (a/2,jA23 .保持 用 的 横 学 标 不 奕 ,将 
它 的 纵 坐 标 改变 为 某 个 值 ? > /2 ,得 到 点 己 (a/2,y) .分 别 取 曲 线 志 为 : 
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(i) 折 线 4PB ,(ii) 从 有 A 经 过 号 到 B 的 抛物 线段 .计算 质点 经 CC 从 有 4 到 BB 所 
花 的 时 间 工 ， 
按照 实验 十 所 说 的 方法 ,选择 yy 的 适当 的 值 Y”, 使 了 最 小 


11.2 寻找 最 速 降 线 


总 时 间 工 依赖 于 曲线 C 的 选取 . 取 定 一 个 ,在 区 间 [0,4j 中 插 人 等 分 
点 Xi 二 ka/n (1 二 4 一 1), 从 而 在 曲线 上 得 到 相应 的 x 一 1 个 分 点 
(zrya), 则 C 可 近似 地 看 作 折 线 A414,…A,-1B ,而 荆 可 近似 地 看 作 各 分 
点 的 纵 坐 标 yx (1 和 上 委 革 一 1) 的 得 数 


六 2 Va 十 《一 3 
人 V 2gy 十 V 2gy 
其 中 & = x 一 zi-1 二 a/n .问题 就 变 成 求 这 个 n 一 1 元 函数 的 最 小 值 . 


取 定 一 组 ce 产值 .用 Mathematica 求 多 元 溺 数 最 小 值 的 语句 求 及 一 1 元 
函数 了 一 了 (yz 一 1)》 的 最 小 值 点 Y* = Cyr 3 ye .为 此 , 首 
先 选 定 一 个 开 值 ;比如 选 n 二 16 .利用 Mathematica 语句 定义 出 TT 依赖 于 15 
个 变量 y1,y2,…，,y15 的 表达 式 . 还 要 选 定 自 变量 《(yY1,y2,…,Y15) 的 一 组 初 
始 值 (hl;h2,…,h15) ,比如 ,可 以 取 从 所 到 BB 的 直线 自作 为 初始 曲线 ,以 直 
线 AB 上 对 应 点 的 符 标 &h/16 (1 雪上 15 ) 依 次 作为 初始 值 hl,h2，……，hls、 
然后 运行 语句 


了 一 Ty yess Yr) 


FindMinimum[T, {(y1,h1}, {y2,h2}) ,** , {y15,h15}] 


求 得 最 小 值 点 了 了" 一 (yY ,Y2 15) 

依次 将 点 AC(0,0),A(d 7 ),A(2d ,yz ) ,As(15d yy) 五 (nGd 天) 连 
成 折线 或 光滑 曲线 ,就 得 到 从 4 到 吾 的 最 选 降 线 的 近似 形状 ， 

取 不 同 的 a,hh 值 ,观察 所 得 的 结果 ,特别 取 一 组 比值 h/a 很 小 的 4a,h , 观 
察 最 过 降 线 先 下 降 后 上 升 的 情形 . 


如 果 不 用 Mathematica ,可 用 别 的 语言 编程 按 前 一 个 实验 中 介绍 的 最 速 
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下 降 法 ( 沿 负 梯度 的 方向 趋向 最 小 值 点 ) 求 最 小 秆 点. 根据 本 问题 的 特点 , 相 邻 
变量 取 值 应 当 很 接近 ,可 考虑 采用 下 面 的 对 各 变量 轮流 优化 的 方法 . 

仍 以 = 一 16 为 例 . 

以 直线 段 4B 作为 最 速 降 线 的 初始 的 近似 解 C。 ,逐步 改进 ,寻找 更 好 的 
近似 解 . 

取 点 As (af2, Ys) ;其 横 坐 标 a/2 为 AA,B 横 坐 标的 平均 值 , 纵 坐 标 Ya 可 以 
变动 , 则 质点 沿 折 线 44sB 运行 的 时 间 了 是 ys 的 一 元 函数 . 可 用 求 一 元 函数 
极 值 点 的 方法 求 ys 的 最 好 值 使 质点 沿 折 线 C1;44sB 运行 的 时 间 最 少 . C, 是 
比 Ce 更 好 的 最 速 降 线 近似 解 . 

固定 4,As,B 点 .在 44,4 之 间 取 点 A,la/4,y4s) ; 求 y 的 最 好 和 值 ,使 质 
点 沿 折 线 4444s 运行 的 时 间 最 少 . 在 4s 与 8 之 间 取 点 4iz(3e/d4,yiz) , 求 ys 
的 最 好 值 使 质点 沿 折 线 C::4s4,: 互 运行 的 时 间 最 少 . 折线 C2:44,441zB 是 
比 C; 更 好 的 解 . 

重复 刚才 的 过 程 :对 组 成 折线 Cs 的 每 一 条 直线 段 4 ,4u (二 1,2,3， 
4) 《约定 4。 = 二 4,41s 一 B), 在 它 的 两 个 端点 之 间 插 入 一 点 
有 -al( 媚 一 2)af/16,y4-2) ,选择 ys 的 最 好 和 值 使 质点 沿 折线 4 ,424 
运行 的 时 间 最 少 , 用 这 条 折线 代替 直线 段 4-,44 ,就 得 到 从 4 依次 经 过 点 
Az 《1s < 和 7) 到 吾 点 的 折线 Cs: 来 代替 Cs , 它 是 比 Cs 更 好 的 解 .然后 再 在 
构成 C; 的 每 一 条 直线 段 4 :4 (1 上 二 8 ) 的 两 个 端点 之 辣 插 入 一 点 
有-_1((2k 一 1)a/16,Yoi-1) ,选择 其 纵 坐 标 y2_1 使 质点 沿 折线 A 242 iA 
运行 的 时 间 最 少 ,用 这 条 折线 代替 直线 段 4za-*4a ,这 样 得 到 从 4 依次 经 过 
点 44 (1 委 上 魏 15) 再 到 已 的 新 的 折线 C 来 代替 Ca , 它 比 Cs 更 好 . 

如 果 还 希望 增加 精度 ,当然 还 可 以 在 构成 折线 C, 的 每 一 条 直线 段 的 两 个 
端点 之 间 再 插入 新 的 点 . 假如 不 再 插入 新 的 点 , 则 在 4, 召 之 间 插 入 的 15 个 点 
的 位 置 仍 有 调整 的 余地 . 注意 奇数 点 41,4，,… ,A1s 的 织 坐 标 是 在 固定 偶数 点 
Ass A A 的 情况 下 的 最 好 值 . 现在 反 过 来 面 定 奇数 点 双人 15 的 位 
置 , 重 新 调整 偶数 点 4: ,44，…,4+ 的 纵 坐 标 yy ，… ,yu 的 值 分 别 使 质点 经 
过 折线 ,4,4,,43444s，,… ,A344A1s 的 时 间 最 少 . 肯 固 定 偶数 点 位 置 而 调整 
所 有 的 奇数 点 纵 坐 标 . 重复 这 个 过 程 ,轮流 调整 奇数 点 和 偶数 点 的 纵 坐 标 , 每 
调整 一 次 都 使 质点 经 过 所 得 的 折线 的 时 间 端 短 一些 , 得 到 最 速 降 线 的 更 好 的 
解 . 直到 在 所 需 的 精度 下 时 间 不 再 能 缩短 为 止 ,就 得 到 了 在 插入 15 个 点 的 情 

况 下 的 最 优 解 - 
以 上 方法 还 可 作 这 样 的 改进 :每 次 在 两 个 已 有 的 点 4.,4, 之 辣 插 入 点 4 
之 后 ,用 从 4 经 过 点 4 到 4, 的 抛物 线段 来 代替 原先 从 4; 到 A, 的 曲线 段 ,并 
选择 4 的 纵 坐 标 y 的 值 使 质点 经 过 这 条 抛物 线段 的 时 间 最 短 . 这 样 ,最 后 得 
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到 的 就 是 由 抛物 线段 组 成 的 曲线 作为 最 速 降 线 的 近似 解 . 


11.3 最速 降 线 的 形状 


前 面 用 求 多 元 函数 极 值 的 数值 方法 求 得 了 最 速 降 线 的 近似 形状 . 但 我 们 
希望 知道 :精确 的 最 速 降 线 到 底 是 什么 曲线 ? 它 的 曲线 方程 是 什么 ? 

在 前 一 个 实验 中 ,我 们 知道 光 总 是 走 最 省 时 间 的 路 线 . 由 此 想到 ,可 以 让 
质点 模仿 光 的 行为 ,按照 光 的 折射 定律 运行 ,这 样 走出 的 就 应 当 是 最 速 降 线 . 

先 将 这 个 问题 离散 化 , 取 一 个 很 小 的 正 实数 4 ,若干 个 不 同 高 度 = kd 
《此 一 0,1,2,… ) ,用 一 组 平行 于 过 轴 的 直线 y 一 点 (大 一 0,1,2, … ) 将 质点 
所 要 通过 的 空间 分 成 很 多 层 , 相 邻 平行 线 y 二 有 -41y 二 所 ( 吉 二 1,2,3, ) 之 
间 所 夹 的 部 分 是 第 x 层 . 当 a 很 小 的 时 候 , 可 以 认为 质点 在 每 一 层 内 部 的 速度 


不 变 , 以 第 屋内 的 平均 速度 w 一 ?80 作为 质点 在 这 一 层 中 


的 速度 . 质点 从 第 太 层 进 人 第 天 十 1 层 时 速度 由 vi 变 为 w+ ,发 生 折射 ,满足 
折射 定律 


sin ck _ vs 即 sin ak sin ar 01) 
SI Geri Ue+l Ux Vi+1 
4 
可 
DD 
PN、 


图 11 一 1 


其 中 人 射 角 a 与 折射 角 w+ 分 别 是 质点 在 第 & 层 、 第 十 1 层 中 的 运行 
路 线 与 y 轴 方向 所 夹 的 锐角 , 于 是 由 (1) 知 
sin a 
VE 
是 一 个 与 无 关 的 常数 . 令 d 趋 于 0, 则 折线 趋 于 最 速 降 线 C .a 成 为 曲线 上 
一 点 P(z,y) 处 的 切线 方向 与 y 轴 的 夹 角 ws， 人 是 质点 在 该 点 的 速度 ”,' 面 上 
述 关 于 at,w 的 关系 式 (2) 变 为 关于 a,v 的 关系 式 


=C {2) 
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sina 
TU 


我 们 有 v 一 V28y -再 来 计算 sin 。 . 光 所 走 的 曲线 C 在 点 PCz,y) 的 切线 广 
向 与 xz 轴 的 夹 角 为 了 一 a. 设 C 的 方程 为 y= f(z), 则 cota= 
至 一 可 = 光 是 函数 ， 一 f(x) 在 该 点 的 导数 值 . 于 是 sin a = 
1 


Vl (yi) 
1 


V2gy(] + (Cy)?) 
其 中 C; 是 常数 . 
引 人 参 数 上 使 六 二 cot z ,就 得 到 


=C (3) 


tan 


` 这样,(3) 式 就 成 为 C 所 应 满足 的 微分 方程 


一 C， 或 化 为 y(l 十 (y:)?) = 


= Csint = ha 一 cos 21) 


(Ci 
> 十 cot*t 


T=0O(— Bsin 21) 十 CC; 二 Ee 一 sin 2:) 十 C。 


令 9 一 必 , 尺 一 全 ,并 考虑 到 一 0 时 y 一 0 , 故 C, = 0. 于 是 曲线 C 的 参数 
方程 是 
工 一 民 人 (一 sinB)， ?一 民 ( 一 cos 
这 是 半径 为 RR 的 圆 洛 着 工 轴 作 无 滑动 的 滚动 时 ,圆周 上 一 固定 点 画 出 的 
曲线 , 称 为 施 轮 线 . (请 自己 验证 这 个 结论 . ) 
按 上 述 参 数 方 程 作出 的 旋 轮 线 总 是 经 过 原点 4(0,0) ,为 了 让 它 也 经 过 
上 Bla,h) ,需要 解 方 程 组 
RO sin0)=a 
R(l ~ cos0)=h 
求 出 适当 的 环 ,98 ,两 式 相 除 消去 尺 ,再 整理 得 8 的 一 元 方程 
hd— hsin G+ acos 6—a=0 
可 用 Mathematica 求 这 个 方程 在 (0,2x) 范围 内 的 解 . 为 此 ,可 先 用 画图 请 名 
画 出 上 面 的 方程 左边 的 函数 f(9) 的 图 像 , 观 察 图 像 与 模 轴 的 交点 的 模 坐 标的 
大 致 的 值 x0. 再 用 求 方 程 根 的 请 句 求 出 在 初始 值 x0 附近 的 根 的 更 精确 的 值 
a. 再 由 
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求 出 R 的 值 . 


选 定 一 组 41 有 值 . 按 上 述 方法 求 出 尺 ,a 的 值 . 务 出 旋 轮 线 有 入 到 B 的 部 分 
T= RG— sin8}, y= R(LT— cos#), ORORa 
在 同一 坐标 系 中 也 出 用 绒 习 2 的 方法 求 出 的 最 巡 降 线 的 近似 形状 ,观察 它们 
与 旋 轮 线 是 否 吻 合 . 为 了 便于 辨认 ,不 六 用 红色 画 旋 轮 线 , 黑 色 或 绿色 画 你 求 
出 的 近似 的 缀 速 降 线 . 
用 练习 1 的 方法 计算 出 质点 经 过 谈 轮 线 从 有 到 B 所 花 的 时 间 丁 .与 练习 
1 对 其 它 曲 线 的 计算 结果 相 比 较 , 看 它 是 否 最 小 . 


旋 轮 线 上 从 4 到 B 的 时 间 人 很 容易 由 积分 算出 . 注意 旋 轮 线 上 从 参数 值 
#8 到 8 十 d8 的 一 段 弧 长 为 
= Vdir+ diy= vy (rx) 十 (站 )2d8 
一 Rl 一 cos :+ Risin0d0 
~=R v2(1 一 cos 0)d0 


T=-| -SS Ss "RYv2(1— cs IR | =ayE 
a ° V2gR(l 一 cos 页 


用 这 个 公式 重新 计算 了 ,与 练习 3 算出 的 结果 相 比 较 . 


利用 与 求 最 还 降 线 类 似 的 方法 解决 下 面 的 问题 :在 一 条 直线 ! 的 同一 侧 
有 两 个 已 知 点 A,B. 试 找 出 一 条 有 从 有 到 召 的 曲线 ,使 这 条 曲线 绕 旋转 所 得 
的 曲面 的 面积 最 小 ， 

体能 否 通过 观察 所 得 曲线 的 形状 猜 出 它 是 什么 曲线 ? 


11.4 等 时 曲线 


从 一 个 定点 豆 点 悬挂 一 根 长 为 工 的 无 重量 不 可 伟 缩 的 细 线 , 细 线 的 另 一 
端 悬挂 一 个 质点 作成 一 个 单 摆 . 伽利略 通过 实验 发 现 ,摆动 周期 与 振幅 无 关 、 
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注意 单 欣 的 质点 运动 的 轨迹 是 以 为 圆心 , 工 为 半径 的 圆 弧 . 设 圆 弧 的 最 估 
点 为 局 , 某 一 方向 的 最 高 点 为 4 . 则 质点 在 重力 作用 下 从 静止 开始 沿 圆 弧 无 
摩擦 地 从 卫 点 滑 到 号 点 所 花 的 时 间 工 就 是 单 摆 周 期 的 174. 按照 敬 利 略 的 实 
验 , 工 应 当 与 P 点 的 位 置 无 关 , 而 只 与 有 关 . 这 个 现象 称 为 单 摆 的 等 时 性 . 
并 且 有 公式 


圆 弧 AD 上 的 任意 一 点 P 的 位 置 可 用 8 = 二 人 DEP 来 表示 . 特别 «= 二 人 DEA 
的 大 小 代表 单 摆 的 振幅 的 大 小 . 点 了 与 4 的 高 度 差 为 Ll(cos 86 一 cos a) ,因此 
质点 在 PP 点 的 速度 为 v 二 V2gL(lcos 6 一 cos a) .质点 从 卫 运 行 一 小 段 弧 到 
忆 点 , 设 这 一 小 段 弧 所 对 的 圆心 角 PEP, 为 四. 则 弧 长 为 L558 ,质点 通过 这 
一 小 段 的 时 间 


加 L80 
VTS 
于 是 从 4 到 只 的 总 时 间 为 
二 | 了 db 到 Lde 
2gL(cos 8 一 cos a) ° V2gL(cos 日 一 cos a) 


如 果 a 很 小 ,当然 8 更 小 ,此 时 


cos 0— cos a [1 二 0 (1 


4T 4 | 2 / 工 
B10 ver— 8 


周期 47 近似 地 与 «无关 .但 当 a 不 太 小 时 ,这 个 计算 误差 就 可 能 比较 大 了 . 


对 w 一 5?,10",…，,90" ,用 数值 积分 方法 (比如 梯形 法 或 辛普森 法 , 见 实 验 
二 ) 计 算 


_ 工 a db 
V 工 /8 o V2(cos 6— cos a) 


列 出 4 与 a 值 的 对 照 表 . 观察 A 随 a 的 变化 而 变化 的 情况 . 由 此 知道 质点 沿 着 
图 长 作 摆动 的 等 时 性 只 是 近似 威 立 . 


质点 沿 着 什么 样 的 曲线 作 摆 动 才 具有 真正 的 等 时 性 呢 ? 
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练习 6 | 


建立 直角 坐标 系 使 了 轴 的 正方 向 向 下 . 任 选 尺 , 按 参 数 方程 
r= RO— sin8), y= RO cos 0) 

作 旋 轮 线 . 8 一 Tt 时 得 到 的 点 D(XR,2R) 是 一 个 最 低 点 , 它 与 最 高 点 (比如 原 
点 OC(0,0) ) 的 高 度 差 为 2R . 任 取 0 所 a 过 zn 得 到 旋 轮 线 在 口 与 品 之 则 的 一 点 
zalyy(a)) . 设 质 点 从 有 点 静止 出 发 湛 旋 轮 线 无 摩擦 地 消 到 口 点 ,用 练习 
2 所 说 的 方法 计算 所 花费 的 时 间 工 .让 质点 到 了 门 之 后 继续 沿 旋 轮 线 自 由 运 
动 , 则 质点 将 以 五 为 平衡 位 置 作 摆动 ,周期 为 47 . 

对 不 同 的 出 发 点 4 (也 就 是 不 同 的 w& ) 计 算 时 间 了 ,在 厂 是 否 随 w 的 改变 
而 改变 . 


通过 以 上 实验 ,可 以 发 现 旋 轮 线 是 真正 的 等 时 曲线 . 实际 上 ,这 一 结论 也 
可 通过 积分 运算 直接 推导 出 来 : 

将 旋 轮 线 上 由 参数 2 决定 的 点 (x (9),y(9)) 记 作 PC) .用 积分 计算 质点 
从 点 了 一刀 Ca) 静止 开始 沿 旋 轮 线 无 摩擦 地 滑 到 最 低 点 D 二 P(r) 所 需 的 时 
间 工 .质点 在 和 4 与 马 之 间 任 一 点 P(9) 的 速度 

v(0) = v3g(y(8) 一 yo) = VIgRicos wa 一 cos 们 
而 从 点 了 (9) 到 P08 十 d9) 的 弧 长 元 
=V(dr) + (dy = Vr (DY + Cy (Od 
=R vy(] 一 cos 0: 十 sinz5dg 一 只 V2(1 一 cos 6)d8 


T= 2 ee 1— cos0 
二 mas ord 


于 是 


EP 2d| cos | 


{COS 二 一 os 二 
sd 
a 2arcsin 3 二 六 
8 cos 8 


小 


d= 


pe 
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《 当 8 一 aa 时 被 积 图 数 分 母 为 0, 了 是 广义 积分 .不 妨 用 Mathematica 语句 
NIntegrate 计算 当 = 二 10-” (Cn 一 10,11, 15》 时 积分 I(s) 一 


1 一 cos 吕 
| Se 的 值 ,观察 FKCe) 的 变化 趋势 . ) 


能 否 也 在 一 个 定点 匡 悬 挂 一 条 细 线 、 细 线 另 一 端 固定 一 个 质点 ,作成 一 
个 单 摆 , 使 它 在 摆动 时 质点 沿 旋 轮 线 运 动 呢 ?可 以 这 样 做 :以 E 为 原点 ,向 下 
的 方向 作为 y 轴 的 正方 向 建立 直角 坐标 系 . 从 原点 向 x 轴 的 两 个 方向 用 硬 质 
材料 各 做 出 旋 轮 线 半 个 拱 ( 如 图 11 一 2): 
r= RIO sin0), y= R(l — cos 0), 一 不 之 XX 区 
则 每 半 个 拱 的 弧 长 为 


| VTEEJE 十 《dy 全 | VIO Fy Od0 
站 
=R| VT eos 0+ siniBdb = 4R 
o 


£ 


11—2 

从 原点 五 悬挂 一 根 长 为 4 的 细 线 , 细 线 另 一 端 固定 一 个 质点 作成 一 个 
单 摆 . 在 这 个 单 摆 的 摆动 过 程 中 ,由 于 受到 悬挂 点 两 方 的 硬 质 旋 轮 线 拱 的 
限制 , 细 线 上 方 接近 E 的 部 分 不 能 拉 成 直线 ,只 能 绕 在 旋 轮 线 拱 上 . 因而 质点 
的 轨迹 不 是 圆 弧 ,而 是 另 一 个 旋 轮 线 . 有 兴趣 的 读者 可 以 自己 通过 理论 推导 或 
设计 一 个 数值 实验 来 验证 这 一 结论 . 这 样 ,我 们 做 出 来 的 这 个 单 摆 的 摆动 周期 
就 真正 与 振幅 无 关 了 . 如 果 振 幅 很 小 , 则 纲 线 受 旋 轮 线 拱 的 影响 较 小 ,质点 的 
轨迹 与 贺 弧 很 接近 ,这 说 明了 普通 的 单 摆 为 什么 具有 近似 的 等 时 性 . 

用 旋 轮 线 可 以 做 出 具有 真正 的 等 时 性 的 单 摆 , 所 以 , 旋 轮 线 又 称 为 摆 线 . 
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附录 用 变 分 法 求 最 速 降 线 的 方程 


设 C;y 二 y(x) (x EE [0,4]) 是 从 A4(0,0) 到 Bl(a,h) 的 连续 光滑 曲线 . 
则 质点 沿 则 线 C 运行 的 时 间 为 


二 J FO,y dx 
其 中 > le 


1 32 3 
Fly,y') = - 


是 y,y' 的 画 数 . 了 不 是 有 限 个 变量 的 画 数 ,而 是 由 一 个 函数 y 一 y(x)(x EE 
[0,a] ) 决 定 , 称 为 泛 函 ,可 记 为 了 (>y(Cz))》 .我 们 的 任务 是 选择 恰当 的 y(x) 使 
个 取 最 小 值 . 这 样 的 求 泛 函 的 极 值 的 方法 称 为 变 分 法 . 

假设 已 选 y= yolx) 使 了 (yo(Cz)) 达到 最 小 值 , 则 对 任意 一 个 其 它 的 函数 
yy 二 y(z) ,有 TCy(x)) 守 Tiyo(z)), 记 56y 二 y(x) 一 yolx) , 则 5y 也 是 
[9,4] 上 连续 可 导 函 数 ,和 且 (3y)(0) = (58y)(a) = 二 0. 设 4 是 绝对 值 很 小 的 实 
数 ,，y 二 y(z,) 二 yolx) 十 By 也 代表 一 条 从 4 到 B 的 连续 光滑 曲线 ,县 
TC(y(z,)) 之 了 (yo(Cz)). TCy(x,)) 可 以 看 作 4 的 一 元 函数 , 记 作 qx), 县 
当 4 二 0 时 达到 最 小 值 . 因此 ,了 = YA) 对 4 的 导数 在 4 二 0 处 为 0. 而 

gz = OED Ye, 


| 375 2 
-fe 3 + py 3 as 
BA 


-| [FBy 十 Fydy Jdz 
0 


2 (rx,4)) ,Fy = > (zx,4)) 0 d a .由 


其 中 卫 , 三 
分 部 积分 公式 得 
上 
jay dz = (Fydy) | ay Fd SS [sy dr 


于 是 
go) = [P, 一 二 Py]8ydx = (1) 


注意 , 若 -个 连续 函数 f(x) 在 某 个 区 间 [x,,x2] 内 不 恒 为 0, 设 了 xso) 天 
0 , 则 存在 正 实数 e 使 f(x) 在 区 间 [zo 一 e,xo 十 2] 内 与 (xo) 同 号 . 又 可 选取 
连续 可 导 函 数 3y 在 区 间 [ze 一 6,xo 十 ej 内 便 为 正 , 而 在 此 区 间 外 人 恒 为 0. 这 
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将 导致 [feayd 与 f(z0) 同 号 而 不 为 0. 这 说 明了 ;如果 | ee” 


对 任意 连续 可 导 函 数 5y 成 立 ,; 则 f(z) 在 区 间 [ziyzs] 内 恒 等 于 0. 
于 是 由 《17 式 待 
F,— Fy 涯 交 《2) 
这 就 是 > = wz) 满足 的 微分 方程 , 称 为 欧 拉 方 程 . 在 我 们 的 情况 下 , 下 只 依 
赖 于 yy,y' 而 不 含 x , 欧 拉 方 程 可 展开 为 
F,— Fyyy ~ Fyyy 一 0 
两 边 连 项 弱 以 y ,好 可 验证 左边 成 为 完全 微分 


d 
(Fyy) 二 0 


从 而 
F—Fyy=C (3) 
C 是 常数 . 在 最 速 降 线 问题 中 ,一 A/ 二 二 .于 是 (4) 式 成 为 
ET Cy)? ek 
28y 2gy(1 十 《7 
再 化 简 后 成 为 


-1 ”=-c， 或 y1+G0029 一 Ci 
v2gy(1 十 (72) 


其 中 C' 是 另 一 常数 . 这 正 是 我 们 在 第 3 节 中 用 光 的 折射 定律 得 出 的 结论 . 在 
第 3 节 已 经 由 它 得 出 了 最 速 降 线 满足 的 方程 , 即 旋 轮 线 的 参数 方程 . 
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在 我 们 生活 着 的 大 干 世界 里 ,除了 有 像 房屋 建筑 公路 桥梁 、 汽 车 ` 飞 机 、 
轮船 以 及 各 种 劳动 生活 工具 等 这 些 人 造 的 形 六 规 册 交 风 何 形体 之 外 , 秽 广 泛 
地 充满 了 诸如 花草 树木 .山川 河流 ,烟雾 云彩 等 形态 极 不 规则 的 几何 形体 . 大 
自然 在 向 人 们 展示 其 美丽 多 变形 态 的 同时 ,也 提出 了 难以 回答 的 询问 :如 何 找 
述 复杂 的 自然 表象 ? 如何 分 析 其 内 在 的 机 理 ? 科学 家 与 艺术 家 一 直 在 苦 昔 追 
寻 着 这 些 问题 的 答案 ,并 力图 从 传统 的 欧 几 里 得 几何 体系 中 解放 出 来. 最 近 几 
十 年 ,一 些 科学 家 开始 爱 胸 地 “感觉 "到 了 另 -个 几何 世界 的 存在 ,这 个 几何 世 
界 的 描述 对 象 是 自然 界 的 几何 形态 . 七 十 年 代 ,美国 科学 家 B. Mandelbrot 用 
Fractal (原意 是 碎片 分 数 等 ) 这 个 词 来 定义 这 门 新 的 几何 学 科 一 分形 拖 何 
学 . 分 形 几何 把 自然 形态 看 作 是 具有 无 限 撕 套 层次 的 精细 结构 ,并 且 在 不 同 尺 
度 下 保持 某 种 相似 的 属性 ,于 是 在 简单 的 选 代 过 程 中 就 可 以 得 到 描述 复杂 的 
自然 形态 的 有 效 方法 . 人 ee 

尽管 分 形 的 提出 只 有 二 十 多 年 的 时 间 , 但 它 已 经 在 自然 科学 的 诸多 领域 
如 数学 .物理 .化 学 .材料 科学 .生命 科学 .地 质 . 地 理 .天 文 .计算 机 乃至 经 济 、 
社会 .艺术 等 极其 广泛 的 领域 有 着 重大 的 应 用 . 可 以 毫 不 夸张 地 说 ,“ 分 形 是 大 
自然 的 几何 学 ”“ 分 形 处 处 可 见 ” 

本 实验 的 目的 是 以 选 代 的 观点 介绍 分 形 的 基本 特性 以 及 生成 分 形 图 形 的 
基本 方法 ,使 读者 在 欣赏 美丽 的 分 形 图 案 的 同时 对 分 形 几何 这 门 学 科 有 一 个 
直观 的 了 解 ,并 从 哲理 的 高 度 理解 这 门 学 科 诞 生 的 必然 ,激发 读者 探寻 科学 真 
理 的 兴趣 . 


12.1 生成 元 


早 在 上 世纪末 及 本 世纪 初 ,一些 数学 家 就 构造 出 一 些 边 界 形状 极 不 光滑 

的 图 形 . 由 于 这 类 图 形 长 期 以 来 被 视 为 “不 可 名 状 的 ?或 “病态 的 ,因而 ,只 有 

当 人 们 需要 反例 时 才 想 到 它们 . 这 类 图 形 的 构造 方式 都 有 一 个 共同 的 特点 , 即 

最 终 图 形 F 都 是 按照 一 定 的 规则 只 通过 对 初始 图 形 F。 不 断 修改 得 到 的 . 其 
中 最 具有 代表 性 的 图 形 是 Koch 曲线 ,Koch 曲线 的 构造 方式 是 : 

给 定 一 条 直线 段 F。 ,将 该 直线 三 等 分 ,并 将 中 间 的 一 段 用 以 该 线段 为 边 
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的 等 边 三 角形 的 另外 两 条 边 蔡 代 , 得 到 图 形 (如 图 12 一 1 所 示 ). 然后 ,再 对 


画 形 F, 中 的 每 一 小 段 都 按 上 述 方式 修改 ,以 至 无 穷 . 则 最 后 得 到 的 极限 曲线 
五 一 limF. 即 是 所 谓 的 及 och 曲线 . 


图 12 一 1 


Koch 曲线 的 修改 规则 R 是 将 每 一 条 走 线段。 用 一 条 折线 FF 蔡 代 ,我们 
称 下 为 该 分 形 的 生成 元 . 分形 的 基本 特性 完全 由 生成 元 决定 . 因此 ,给 定 一 个 
生成 元 ,我 们 就 可 以 生成 各 种 各 样 的 分 形 图 形 . 以 下 是 几 个 经 典 的 分 形 图 形 及 
其 生成 元 : 


图 12 一 2 Mijnkowski 香 肠 ” 


图 12 一 3 Sierpinski 三 角形 


< 


图 12 一 4 龙 曲 线 
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一 5 ”Hilbert 曲线 


图 12 


图 12 6 树木 花草 
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其 中 ,前 两 种 分 形 图 形 的 生成 元 比较 简单 .但 后 三 种 分 形 图 形 的 生成 元 相 
对 比较 复杂 . 在 龙 曲线 中 ,生成 元 将 一 直线 段 修 改 为 由 两 互相 垂直 的 线段 构成 
的 折线 .但 在 决定 向 娜 个 方向 折 时 存在 两 种 选择 (假设 线段 都 有 确定 的 定 问 ， 
即 我 们 要 次 定 折线 是 在 线段 的 左边 还 是 在 右边 ). 本 生成 元 规定 ,折线 方向 对 
每 条 线段 依次 交替 地 改变 ( 见 图 12 一 4). 对 Hilbert 曲线 ,虽然 它 的 生成 元 十 
分 复杂 ,但 其 原理 与 龙 曲 线 类 似 . 在 图 12 一 5 中 ,每 个 小 线段 的 左 侧 或 右 侧 都 
画 了 一 根 短线 , 它 并 不 是 分 形 图 形 的 组 成 部 分 , 它 表示 在 下 一 步 兴 代 时 ,生成 
元 应 位 于 短线 指示 的 小 正方 形 之 内 . 树木 花草 的 生成 元 有 些 特别 , 它 具 有 所 谓 
的 分 支 结 构 . 其 中 有 一 些 参 数 可 以 改变 ,如 每 段 树枝 的 长 度 以 及 树枝 之 间 的 夹 
角 人 5. 


用 计算 机 给 出 Koch 曲线 ,SierpinsKki 三 角形 及 一 树木 花草 的 图 形 . 体能 
否 自 己 构 计 一 些 生 成 元 ,并 由 此 给 出 相应 的 分 形 图 形 ? 任 取 分 形 图 形 的 一 个 局 
部 并 将 它 放 大 , 它 同 原来 的 分 形 图 形 有 什么 关系 ? 


从 一 个 正三 角形 出 发 ,用 Koch 曲线 的 生成 元 做 和 迭代 得 到 的 极限 图 形 称 
为 Koch 雪花 曲线 . 

(1) 试 计算 雪花 曲线 的 边 长 及 面积 ,它们 是 否 有 限 ? 你 如 何 解释 所 得 出 的 
结论 ? 

(2) 雪 花 曲 线 是 否 光 浓 ( 即 每 一 点 是 否 有 切线 存在 )? 

《3) 其 它 的 一 些 分 形 是 否 具 有 类 似 的 性 质 ? 


假设 生成 元 由 条 线 眉 构 成 ,每 身长 度 为 原 线 瑞 长 度 的 二 ,定义 该 分 形 


的 维 数 为 


_ log) 
d= Togtel 


(1) 想 一 起, 这 样 定 义 分 形 的 维 数 有 什么 道理 ? 分 形 维 数 的 大 小 反映 了 分 
形 的 什么 特性 ? 

(2) 利 用 上 述 公 式 , 计 算 雪 花 曲 线 ,Minkowski 香肠 的 维 数 . 

《3) 从 直观 上 看 ,Hilbert 曲线 将 寺 满 整个 正方 形 ,你 是 否 相 和信 这 个 事实 ? 


ee ee 人- 
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你 猜测 Hilbert 曲线 的 维 数 是 少 ? 
(4)Sierpinski 三 角形 的 维 数 该 如 何 定 义 ? 按 你 的 定义 ,计算 Sierpinski 三 
角形 的 维 数 ,并 解释 所 得 结果 . 


定义 Weierstrass 函数 如 下 : 


1 


W(z) = Sasin(Xr), A>1, 1<s<2 


#=1 
对 不 同 的 s 值 , 画 出 肖 数 的 图 象 , 观察 图 象 的 不 规则 性 与 s 的 关系 ,由 此 猜测 
Weierstrass 函 教 图 象 的 维 数 与 了 的 关系 . 


12.2 复 变 函数 迭代 


早 在 上 个 世纪 就 有 一 些 数 学 家 对 复 变 水 数 的 逃 代 进行 研究 . 然而 ,直到 本 
世纪 80 年 代 ,B. Mandelbrot 才 将 复 变 阔 数 的 迭代 与 分 形 联系 起 来 ,并 绘制 出 
了 第 一 张 以 他 的 名 字 命 名 的 引人入胜 的 分 形 图 形 . 复 变 函 数 的 先 代 由 此 再 一 
次 成 为 数学 家 的 热点 研究 问题 - 

给 定 初 始 复数 Z, ,考虑 如 下 的 迭代 

Zi =2Zitp k= 0,1,2, (1) 
其 中 Zi ， = 1,2,°"， 为 复数 , w 为 ( 复 ) 常 数 . 

对 于 给 定 的 初始 点 Zu ,和 迭代 序列 142 人。 有 可 能 有 界 , 也 可 能 发 散 到 无 

穷 . 令 J 是 使 得 揭 代 序列 {Zi} 全 。 有 界 的 所 有 初 值 Ze 构成 的 集合 , 即 

J 二 {Zo| 选 代 序列 (Zi) 人 有 界 } {2) 
我 们 称 几 在 复 乎 而 上 构成 的 集合 为 Julia 集 .对 不 同 的 参数 x ,Julia 集 的 形状 
也 会 不 同 . 特别 地 , x 一 0 对 应 的 Julia 集 为 单位 圆 盘 . 

如 果 国 定 初 值 Z。, 则 对 不 同 的 参数 x ,迭代 序列 {Zi) 汇 。 的 有 界 性 也 不 相 
同 , 令 Mz 是 使 得 选 代 序 列 {Zi} 从 。 有 界 的 所 有 参数 值 4 椅 成 的 集合 , 即 

Mz, 二 {py| 渴 代 序列 {2}) 汪 。 有 界 ， (3) 
则 称 Mz, 在 复 平 而 上 梅 成 的 集合 为 Mandelbrot 集 . 

为 了 便于 在 计算 机 上 绘制 出 Julia 集 与 Mandelbrot 集 ,我 们 令 2 二 

十 jy 天 一 态 十 1 ; 则 (1) 可 改写 为 
zi 一 得 一 捧 十 让 
人 = 2xeyx 十 9 


开 一 0 2 (4) 
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记 志 二 zt 十 Yi, 则 Julia 集 为 使 得 序列 1 人。 有 界 的 初始 点 〈zo,yo) 构成 的 

合 ,Mandelbrot 集 为 使 得 序列 {7r,) 宛 。 有 界 的 参数 (p ,9) 构成 的 集合 . Julia 
集 与 Mandebrot 集会 是 什么 样子 ? 如 果 没 有 计算 机 的 帮助 ,你 是 很 难 想 象 的 . 
下 面 ,我 们 给 出 这 两 种 集合 的 计算 机 做 图 方法 . 


Julia 集 绘制 方法 : 
(1) 设 定 初 值 P,g ,一 个 最 大 的 和 迭代 次 数 入 ,图 形 的 分 辩 率 的 大 小 a,6 和 和 
使 用 的 颜色 数 天 (如 下 二 16 )( 或 者 给 定 灰 度 级 工 ). 
(2) 设 定 一 个 上 界 秆 MA 六 max(2, Vp 二 5) . 
(3) 将 矩形 区 域 民 : 二 {(x ,9)| 一 MM 宅 xyy 志 如) 分 成 a X65 的 网 格 , 分 
2M 


别 以 每 个 网 格 点 (f,8) ,fr 二 一 M+ 于 Xi,g=- M+ xj,i= 


0, 1 ay 一 0,1… 汪 作为 初 值 (xo,yo) 利用 (riter) 做 迄 代 (实际 上 ,只 需 
对 满足 十 总 二 M4 的 初始 点 达 代 ). 如 果 对 所 有 和 入 ,如 十 训 二 2 ,， 则 
将 图 形 的 (i,7) 象 素 点 用 黑色 显示 . 否则 ,如 果 从 和 迭代 的 某 一 步 ma 开始 有 
zh 十 3 之 M? , 则 用 第 no。mod K 种 颜色 显示 相应 象 素 (或 者 用 相应 的 灰 度 级 
显示 )， 

Mandelbrot 集 的 给 制 方法 : 

(1) 设 定 一 个 最 大 的 迭代 次 数 入 ,图 形 的 分 辩 率 的 大 小 a,b 和 使 用 的 颜 
色 数 天 《如 五 = 16 )( 或 者 给 定 灰 度 级 工 ). 

(2) 设 定 一 个 上 界 值 M 宇 2. 

(3) 将 矩形 区 域 R: = {(p,g) | 一作 硅 ps,9 全 MMM} 分 成 4。 X65 的 网 格 ,分 
别 以 每 个 网 格 点 (fi,8D) ,f= 一 M+ 于 Xi,g=-M+ 开 Xj,i- 
0,1," ,4 ,J 二 0,1,…,6 作 为 参数 值 (p,9) 利用 (riter) 做 选 代 (实际 上 ,只 需 
对 满足 庆 十 叶 委 4 的 初 给 点 选 代 ), 每 次 选 代 的 初 值 均 取 为 (xo,y0) = 二 (0,0). 
如 果 对 所 有 2 夺 入 ,十 二 M7 , 则 将 图 形 的 ,站 点 用 黑色 显示 . 否则 ,如 
果 从 迁 代 的 某 一 步 a。 开 始 有 工 ;, 十 六 之 22, 则 用 第 n,mod 天 种 颜色 显示 相 
应 象 素 ( 或 者 用 相应 的 灰 度 级 显示 ). 


编写 绘制 Julia 集 的 程序 .对 不 同 的 参数 (p,9) : (0,1) , (一 1;0) ， 
(0. 11,0. 66)，( 一 0.102 81,0.957 23)，( 一 1.25， 一 0.01) 观察 Julia 全 的 
变化 . 取 Julia 集 的 不 同 局 部 放大 ,你 能 看 到 某 种 自 相 己 现 象 吗 ? 
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绘制 Mandelbrot 集 . 然后 ,任意 选取 它 的 一 个 局 部 将 其 放大 ,然后 再 将 放 
大 图 形 的 不 同 局 部 放大 . 由 此 观察 Mandelbrot 集 与 Julia 集 有 何 关 系 . 进 一 
步 , 取 参数 J 位 于 Mandelbrot 集 的 不 同 部 位 (如 内 部 .外 部 .边界 、 某 个 芭 芽 的 
内 部 等 ) ,观察 相应 的 Julia 集 的 形状 的 变化 . 


Julia 集 与 Mandelbrot 集 可 以 推广 到 高 阶 情 形 . 一 般 地 ,考虑 选 代 
Zi 一 Z2 十 c， 此 一 01， 
使 得 选 伐 (5) 有 界 的 初 值 Zu 构成 nn 阶 Julia 集 . 对 国定 的 参数 Ze ,使 得 进发 
{5) 有 界 的 参数 c 构成 nn 阶 Mandelbrot 和 集 . 试 画 出 三 阶 、 四 阶 及 五 阶 Julia 集 
与 Mandelbrot 和 集 ,并 通过 放大 不 同 的 局 部 观察 它们 的 自 相似 性 . 


10. 3 IFS 和 迭代 


证 我 们 以 下 面 的 -个 简单 的 绘图 游戏 来 说 明 IFS 和 迭代 . 

在 平面 上 任 取 不 共 线 的 三 点 4, B 和 C ,并 确定 三 个 相应 的 概率 pa = 
0.50 ,pa 一 0.47 , pe 一 0.03. 任 取 一 个 点 Z。, 按 下 述 步 又 在 平面 上 画 出 新 
的 点 列 Z., ?一 1,2,…，: 2,.1 以 概率 ps 选 定 为 扫 与 Z, 的 中 点 ,以 概率 ps 选 
定 为 召 与 2, 的 中 点 ,以 概率 pe 选 定 为 C 与 Z。 的 中 点 . 即 


以 概率 p 
Zsti 一 和 + 以 概率 ps 
2 以 概率 pc 


如 果 我 们 按 上 述 步骤 迭代 下 去 ,最终 得 到 的 图 形 会 是 什么 样子 呢 ? 如 果 迭 
代 仅 仅 只 有 一 于 次 或 一 万 次 ,你 将 会 看 到 乱七八糟 的 一 片 . 因此 ,有 人 把 这 个 
游戏 称 为 “混沌 游戏 ”但 当 和 迭代 次 数 在 一 百 万 次 以 上 时 ,图 形 将 渐渐 开始 清 
晰 , 图 12 一 ?7 给 出 了 和 迭代 一 亿 次 的 结果 . 读者 可 以 看 出 , 它 正 是 我 们 前 面 提 到 
的 Sierpinski 三 角形 的 逼近 图 形 ! 


re 
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图 12 一 7 


上 述 绘 图 游戏 中 的 迭代 邑 是 IFS 迭代 . IFS 选 代 的 一 般 提 法 是 : 

给 定 一 组 ( 仿 射 ) 变 化 ww, : 

WX,Y) 一 《ai 十 ay tart ay tb) Fo 112 
以 及 相应 的 一 组 概率 pp,… sp, (pi 十 … 十 p= 二 1, bp; 这 0). 对 于 任意 选取 
的 初始 值 Z。 二 《zo,yo) ,以 概率 p; 选取 变换 w; 做 迭代 

A 一 TI(CTnyyn)》， 天 盖 0 1， 

则 点 列 Z,,n 一 0,1,… 收 全 的 极限 图 形 称 为 一 个 IFS 吸引 于 . 利用 IFS 迭代 
不 仅 可 以 生成 许多 有 趣 的 分 形 图 形 ,而且 可 以 应 用 于 分 形 图 象 的 压缩 . 下 面 ， 
我 们 给 出 IFS 迭代 绘制 分 形 的 方法 . 

设计 算 机 屏幕 的 可 视窗 口 为 

Vo {ry rm RAR Te ya 生生 oo) 
按 分 辩 率 大 小 的 要 求 将 了 分 成 e X 5 的 网 格 , 网 格 点 为 (xi,y,) ,这 里 
Ti 一 Tai 十 (CTXnax 一 on)ic 1 一 0 1 4 
yy = yin tT Cymax 一 mn)7[0， 了 一 01， 
用 TY, 表示 矩形 区 域 {(z,y)|z 委 工 委 TH 邦 委 7y 委 + .假设 我 们 采取 
具有 工 (如 工 = 256 ) 级 灰 度 的 黑白 图 象 绘 制 ,总 共 的 迭代 次 数 为 N ,其 中 落 
于 区 域 六 中 的 点 的 个 数 为 上 . 再 记 
A=maxp,, 一 0 1 4 一 1，7 一 0 1 一 1 
则 象 素 (7, 让 的 灰 度 GG,7) 与 落 于 7 中 的 点 数 成 正比 : 
GO =—wAXL 

于 是 即 给 出 了 IFS 迭代 产生 的 分 形 的 工 级 灰 度 图 象 . 
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回 到 前 面 的 “混沌 游戏 ”. 如 果 把 三 个 概率 分 别 取 为 pa 二 py = pe 一 本， 
则 选修 一 百 万 次 的 图 形 如 何 ? 再 取 一 组 其 它 的 概率 值 绘制 相应 的 图 形 ,结果 又 
如 何 ? 据 此 ,你 认为 概率 的 选取 对 最 终 的 极限 图 形 (JFS 吸引 子 ) 有 没有 影响 ? 
概率 的 作用 是 什么 ? 


给 定 食 射 变换 
Wwi{tZ) = s+1, wlZ)=s2—1 
以 及 相应 的 概率 户 一 ;一 却 , 其 中 5,Z 均 为 复数 . 取 s 一 0.5 十 0.5i ,绘制 相 
应 IFS 迭代 的 吸引 子 的 图 形 , 取 不 同 的 5 ,观察 图 形 的 变化 . 


考虑 两 个 更 一 般 的 变 接 
wi(Z) = YZ—©C, ws(Z) = YZ+C 
以 及 相应 的 概率 pi 一 户 一 二 ,其 中 C,2 为 复数 . 取 不 同 的 参数 C (各 C 一 i ， 
C= 一 1,C == 0.1] 十 0,66i 等 ). 观 察 图 形 的 实 化 . 你 妮 发 现 什么 现象 ? 


附录 ] Mathematica 程序 
1. Koch 雪花 曲线 


redokoch[ ptlist_List] : = 
Block[ {tmp = {},i,pnum = Length[ ptlist ]}, 
For[i = 1,i< panum,i=i+1,tmp = Join[tmp, {ptlist[ [i]], 
ptlistECi]] * 2/3 十 ptlist[[i + 1]]/3, 
Cptlist[Fi]] + ptlist[ fi + 11])/ 
2 十 {ptlistL[i]]Lt2]] 一 ptlistL[i + 4141JCL2J], 
ptlist[ fi 十 二][LLI] 一 ptlistL[i]]EL1]]} * Sqrt[31/6, 
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ptlhist[ [i]]/3 十 ptlist[ [i + 11] * 273， 
ptlist[ [i 十 111}]1];tmp] 


lnkol0i 二 {1{0,0},{1 ,0} 1 


Showf Graphics[Line[ Nest[redokoch ,jnkonl1,S]]， 
AspectRatio — >> Sqrt[ 3]/6]] 


2. Minkowski 香肠 


redominkowski[ ptlist_List] : 一 
Blockf {tmp 一 《} tmpl ipnam 一 Length[ ptlist]}, 
For[i 一 1,i < pnum,i 一 1 十 1 
tmpl 一 《PtlistL[i]F[2]] 一 PtlisttCi 十 111CL21), 
ptlist[ Di + 1]ILE1)] 一 ptlistL[iJILL1I]}/4; 
tmp = Join[tmp, {ptlist[ [i]]j, 
ptlistC [Cid] * 3/4 十 ptlistL[i 十 11]/4, 
ptlistC[i]] * 3/4 十 ptlist[ [i + 17j/4 + tmpl， 
ptlist[[i]]/2 -+ ptlistLCi 十 1]1/2 十 tmpl， 
ptlistT [i]]/2 + ptlist[ Hi 十 111/2, 
ptlist[[i]]/2 + ptlist[ [i 十 1)1/2 一 tmpl， 
btlist[[ 门 ]/4 十 ptlist[ [i + 11]] * 3/4 一 tmpl, 
ptlist[ {ij1/4 + ptlist[ Cf 十 IJ] * 3/4, 
ptlistL[i + 11]}] 


tmp 


redomk1[ptlist_List] : = 

Block[ {tmp 一 (ptlist[Fi]jrr2]] 一 ptlistLL2]1LL21], 
PtlistLL2]]LL1J] 一 ptlist[[3]J[CL1]1}}/4}, 
{ptlist[[1T]]， 
ptiist[[1]]x* 3/4 十 ptlist[[2]]/4， 
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ptlist[ [1]] 
ptlist[[1]] 
ptlist[ [1]] 
ptlistLL11] 
ptlist[ 1]J 
ptlist[L [1]] 
ptlistL[L23j 
}] 


* 3/4 十 ptlist[[2]]/4 十 tmp， 
/2 十 ptlist[ [2]]/2 十 tmp， 

/2 十 ptlist[F2]]/2， 

/2 十 ptlist[L[2j]/2 一 tmp， 

/4 十 ptlist[[21]* 3/4 一 tmp， 
/4 十 ptlist[[2]] * 374， 


redomk2[ ptlist_List] : = 
Block[L{tmp = {},i,pnum 一 Length[ptlist]}, 


ForLi = 1， 


i< pnum,i— i 1， 


tmp = Join[tmp ,redomk1L {ptlist{ [i]], 


ptlist[ [i 十 
tmp 


四 


In0l = {{0.,0}, 


Show[Graphics[Linef Nest[redominkowski ,ln01,4]]， 


1]1}]]]; 


{1,0}}s 


AspectRatio — > 1/GoldenRatio | ] 


3. Sierpinski 三 角形 


redosierpinski[ ptlist_List ] : 一 
Block[ {tmp = {},i,pnum 一 LengthLptlist]/3) ， 


For[i = 0， 


i< pnum,i=i-1, 


tmp = Join[tmp, {ptlist[ [3i + 1]j, 


(ptlist 
(ptlist[L[3i 十 
《ptjist 
ptiist[ 
《ptlist 
Cptlist 


[L3i 十 1]] 十 ptlistLL3i 十 2]])/2, 
1]] 十 ptlist[[3i 十 3]])72， 
LL3i 十 1]] 十 ptlistLL3i 十 2]])/2， 
[3i 十 2]]， 
[L3i 十 2]] 十 ptlist[f3i 十 3]])/2, 
[[3i 十 1]] 十 ptlist[[3i 十 3]])72， 
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(ptlist[ [3i + 2]] 十 ptiistLL3i 十 31])/2, 
ptlistF[3i 十 3]]}]]; 


tmp ] 


showsierpinski[ ptlist_List]: 一 
Block[L {tmp = {},i,pnum = Length[ptlist ]/3}, 
For[li = 0,i < pnum,i 一 ii 十 1 
AppendTeftmp. 
Polygon[ {ptlist[[3*i + 1]], 
ptlist[[3x*i+t 2]],ptlist[[3*i+ 31]}]]]; 
Show[Graphics[tmp ] ,AspectRatio 一 全 1/GoldenRatio | ] 


p21 一 { 一 1,0},{1,0}),{0,Sgrt[3]}}; 


showsierpinskiL Nest [redosierpinski, pol,4]] 


4. 树木 花草 


redotreef ptlist_List ] : = 
Block[ {tmp = {},i,ptnum = Length [ptilist ]/2， 
midpt1 ,midpt2 ,leftpt ,rightpt } » 
For[i = 0,i < ptnum,i=i+1, 
midptt = (ptlist[[2i + 1]]*2 + ptlist[[2i + 2]])/3; 
midpt2 = (ptlist[[2i 十 11] 十 ptlist[[2i + 2]] * 2)/3; 
leftpt 一 midptl + {{Cos[theta], 一 Sin[theta |}, 
{SinFtheta],Cos[theta]}}. { 
ptlist[[2i + 213[[£1]] ~— ptlist[[L2i + 1jjC[C1]], 
ptlistLL2i 十 2]][f2]] 一 pthistL[2i 十 1]]L[2]1}/3; 
rightpt = midpt2 十 《{Cos[theta ],Sin[theta ]}, 
{ 一 Sin[theta] ,Cos[theta])》 .1 
ptlistf[2i 十 2]]LL1]] 一 pllist[f2i 十 1jJC[L11), 
ptlist[ [2i 十 2]]EL2]] 一 ptlistLL2i 十 1][L[2]])73; 
tmp = JoinLtmp, {ptlist[[2i 十 1]j,midpt1, midpt1 ,leftpt ， 
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midptl,midpt2,midpt2,rightpt, 
midpt2 ,ptlist[ [2i + 2]]}]j; 
tmp] 


showtree [ptlist_List] : = 
Block[ {tmp = {},i,ptnum = Length[ ptlist ]/2}, 
For[i = 0,i < ptnum,i = i 1, 
AppendTo[tmp, 
Line[ {ptlist[[2i 十 1]],ptlistL[2i + 2]]}]]]; 
Show[Graphics[tmp ] ,AspectRatio — > 3/2/Sin[theta |] 
] 


theta = 30Degree; 


showtree[ Nest[redotree, {{0,0},{0,1}},4]] 


5, Weierstrass 晴 数 


lambda 一 2;mmax = 20;s = 1.5; 
Plot[Sumflambda ~ (Cs — 2)k)Sin[fliambda ~ kx], 
{k,1,nmax} |], {x, — 1,1)] 


6. Mandelbrot 集 以 及 它 的 局 部 放大 


iter{x.,y_,lim 1]:= BlockL {ec,z,ct}, 
c=xXx+lxyz = cct 一 0 
While[(Abs[z] < 2. 0)&8&.Cct < lim), 

十 十 ctsz 二 2xz 十 c;]; 
Return[et |; ] 


Mandelbrotl 一 
DensityPlot[iter[x,y,50], {xX, — 2.0,1.0},{y, — 1.5,1.5}, 
PlotPoints — >> 120,Mesh — > False] 
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Mandelbrot2 = Show[Mandelbrot1 ， 
Graphics[Line[{{— 0.9, 一 0.25})， 
{— 0.7,C— 0.25},{— 0.7, — 0. 05}, 
{— 0.9, — 0.05},{— 0.9, — 0. 25}}]]] 


Mandelbrot3 ~ DensityPilot[iter[x,y,50], 
{xX, — 0.9,; 一 0.7},1y, 一 四 .25， 一 0., 05}, 
PlotPoints 一 人 > 120,Mesh 一 全 False] 


?7.Julia 集 册 及 它 的 局 部 放大 


juliaLx_,y_ ,lim_ ,cx ,cy_] :一 
Block[ {z,ct = 0),z 一 和 十 Ixy; 
While[ (Abs[z] 一 2.0)&RCet < lim)， 十 十 et; 
zZ 一 ZxZ 十 《ex 十 工 xey)i];Return[Lect];] 


juliat 一 DensityPlot[julia[x,y,50,0. 27334,0. 00742]， 
{Xx， eg 1.5,1,.5},iy, — 1.5,1.5}, 
PlotPoints 一 全 120,Mesh 一 人 > False | 


julia2 = Show[julial,Graphics[Line[{{— 0.7, — 0. 1), 
{一 和. 3， 一 0 和. 1 , (一 0.3,0.3}, 
{— 0.7,0.3},{— 0.7, ~ 0. 1)}j]] 


julia3 = DensityPlot[Ljulia[x,y ,50,0.27334,0. 00742]， 


{XxX， — 0.7, 一 0.4},1y, 一 0.1.,0.3;, 
PlotPoints 一 人 > 120,Mesh —>> False] 


8. IFS 迭代 生成 Sierpinski 三 角形 


pl = 0.3;aaa = 1/2 + I1//N; fltz_] :一 (z 十 aaa)72; 
p2 = 0.3;:bbb = 0//N; {2[z_]:= (z+ hbb)72; 
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P3 = 0.4sccc = 1//N; f3[z_]:= {z+ cec) /2; 


fLz_] :一 Block[ {tmp} ,tmp = Random| ]; 
Whichftmp < pl1,f1[zj,tmp < 一 pl 十 pP2,f2[z],True,f3[z]]; 


Array[mu, {150,150}]; 
showIFS[z0_ ,shrange_List,divi_List,nmax_]:= 
Block[ {i,j,z = z0,a = divi[ {11]j,b = divif[2j], 
templ,temp2,mumax = 0}, 
For[i=a,i> =1.,i ;For[j=b ,> =1,j — ~ ,mu[i,j]=0]]; 
Forli = nmax,i = 1,i——,， 
templ = Floor[ divif[1i]}* (Relz]j— shrange[ [11][[1]1]} 
/shrange[ [21]([1j] 一 shrangeL[L1]J[C1]])] + 1; 
temp2 = Floor[ divi[[2]] * (Im[z] 一 shrangefL1]]LL2]]) 
/shrange[l [2]][[2]] 一 shrange[ [3]){[211)] + 1; 
mu[templ,temp2] 十 十 ; 


z= f[z]; 
了 
ForLi 一 ai 全 一 1 一 一 ， 
For[j=b,j>=1,j 一 一 ,mumax 一 MaxLmumax,mu[i,j]]]]; 


mul=Table[GrayLevel[I—N[ma[j,ij/mumax], (i,a}, {j,b}]; 


Show[ Graphics[RasterArray[mu1 |]] 
] 


showIFS[0I0,{{— 0.1,— 0.1},{1. 1,1. 1}}.(150,150} ,100000] 


附录 2 ” ”Mandelbrot 集 与 Julia 集 的 C 程序 


#include ”graphics.hy 
检 inpclude ”stdio. h” 
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#inciude "conio. hy” 
#include ”stdlib. h” 
妇 include "math. hy” 


夫 include "time. hy 


#define SCREEN WIDTH 800 
# defineSCREEN_ HEIGHT 68600 


六 关 闪 和 关 闪 关 闪闪 关头 闫 半生 并 闫 闫 攻关 关 关 半 关 关头 关 并 关 并 并 
Mandelbrot set 

闫 着 美美 关 关 甘美 关 关 并 并 关 闫 美美 关 闫 关 并 关 关 并 */ 
检 define MAXCOLOR 16 

#define MOD 100 

+#define SUM 30000 

void DrawMandelbrot (int x_top ,int y_top， 

int x_bottom ,int y_bottom) 

{ 

int npinqyks 

int ViewportX—x bottom—x_ top， 

ViewportY =—=y_ bottom—y_tops 

double x[MAXCOLOR 十 1],yEMAXCOLOR 十 1]; 

double r,p ,gpmin 一 一 2.25 ,pmax 一 .75,qmin 一 一 1.5 ,qtmax 一 1.5 
double deltap= (pmax—pmin)/(double) (ViewportX—1), 

deltagq= (qmax— qmin)/(double) (VicewportY —1); 
for(np=0;np<ViewportX;np 二 十 ) 
for(nq 一 0;nq<<ViewportYinq 十 十 ) 

《 

k=0; 

p=pmin++np * deltap: 

q 一 qmin 十 nq * deltaq; 

x[0]=y[0]=0; 

do 

{ 

x[k 十 1] 一 x[k]x*x[k] 一 yfk]xykEk] 十 p 

y[k 十 1 一 2x*xLkjxyLk] 二 qds 
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k 十 十 ; 

r=x[k]* x[k]+y[k} x yLk]; 

) while(k<MAXCOLODRRRr< =MOD); 

if(r>MOD) putpixel(np+x_topnqty_top,k); 

if(k==MAXCOLOR)putpixel (np+tx_top,nqty_top ,0); 
} 


类 关 关 关 美 舌尖 关 关 并 美和 站 关 关 关 尖 半 关 区 关 着 闫 关 尖 关 攻 关 
Julia set 
认 六 闪闪 新 关 亲 关 并 类 关 新 关 并 六 着 亲 关 关 关头 
void Draw hliaSet(int x_top,int y_topsint x bottom, 
int y_bottom ,double p,double q》 
{ 
int nx,nysk=0; 
int ViewportX 一 x_bottom 一 x_top， 


ViewportY—y_bottom—y._tops 


double r; 
double x[MAXCOLOR+ 1],y[LMAXCOLOR++1]; 
double xmin=—1,5,xmax=l1.5,ymin=—~—1.5,ymax=1. 5 


double deltax ~(double) (xmax —xmin)}/ (double) (ViewportX —1), 
deltay = (double) (ymax—~— ymin)/(double) (ViewportY 一 1); 
for(nx=0;nx<=ViewportXsnx 二 十 》 
for (ny 一 0iny<< 一 ViewportYiny 十 十 ) 
{ 
k=0; 
x[0]=xmin++nx x* deltaxs 
y[0] 一 ymin 十 ny * deltay; 
do{ 


x[k+1]=x[k]*x[k]—y[k] *y[Lk]+p; 
y[k+1]=2#*x[k]*y[kj+a; 

kK 十 十 ; 

r 一 xLk]*x[k] 十 y[k]*y[k]; 
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}while(k<<MAXCOLOR &&. r=MOD); 
if(r>MOD) putpixel (nx+x_topsy_bottom—ny,k); 
if{Ck==MAXCOLOR)» putpixel (nx+x top,sy_bottom—ny,0); 
} 


类 亲 关 关 闫 关 开关 并 关 关 关 关 关 关 攻关 尖 关 六 关 关 尖 关 关 关 
Main Project 
关 关 关 关 关 闫 闪 关 闪 关 关头 并 其 关 关 关 关 关 关 关 关 关 并 关 关 并 关 / 
void main() 
{ 
int gdriver ~=DETECT ,gmode ,errorcode; 
/x* initialize graphics mode */ 
initgraph (Bgdriver ,Rgmode,”" );, 
/x read result of initialization #/ 
errorcode 一 graphresult(); 
if {errorcode ! = grOk) /*# an error occurred x*/ 
‘ 
printf(”"Graphics error: %s\n’ ,grapherrormsg (errorcode)); 
printf(”Press any key to halt:"); 
getch(); 
exit(1)s /¥ return with error code */ 


DrawMandelbrot (0,0,400,400); 

getch() ;cleardevice (); 

DrawjuliaSet (0,0,200,200,—0. 12,0.74); 
DrawjuliaSet (200,0,400,200,—1,—0,25); 
Draw}uliaSet(0,200,200,400,0. 11031,—0. 67037); 
DrawJuliaSet (200,200,400,400,0. 35 ,0. 05); 
getch(); 
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实验 十 三 ”和 迭代 (三 ) 混沌 


在 实验 九 、 实 验 十 二 中 我 们 故 到 ,利用 一 些 简 单 的 选 代 格 式 可 以 求解 方程 
《组 ), 同 时 还 可 以 产生 非常 复杂 而 漂亮 的 分 形 图 形 . 在 本 实验 中 我 们 将 看 到 、 
选 代 还 可 以 产生 类 似 于 随机 行为 的 一 种 非常 古怪 的 现象 ,我 们 把 这 种 现象 称 
之 为 混沌 . 

实际 上 ,混沌 与 分 形 是 密 不 可 分 的 . 混沌 中 包含 着 分 形 ,分 形 中 包含 着 混 
沌 . 它们 是 一 对 挛 生 兄弟 . 本 实验 我 们 将 从 从 一 个 简单 的 二 次 函数 的 迭代 出 
发 ,使 读者 认识 混沌 现象 及 其 所 蕴涵 的 规律 性 . 


13.1 周期 点 与 周期 轨道 


在 系统 探讨 混沌 现象 之 前 ,我 们 约定 一 些 基本 的 术语 . 

设 f(x) 是 一 个 定义 在 实数 域 上 的 实 值 函 数 , 如 果 存 在 * 使 得 fx) = 二， 
则 称 为 f(x) 的 不 动 点 . 我 们 用 w 一 表示 这 件 事 . 如 果 所 有 附近 的 点 在 选 
代 过 程 中 都 趋向 于 某 个 不 动 点 , 则 该 不 动 点 称 为 吸引 点 ,有 时 也 称 该 不 动 点 是 
稳定 的 . 如 果 所 有 附近 的 点 在 迭代 过 程 中 都 远离 它 而 去 , 则 该 不 动 点 称 为 排斥 
点 ,有 了 时 也 称 该 不 动 点 是 不 稳定 的 . 例如 , 0 与 1 是 f(x) = x 的 不 动 点 . 0 是 
吸引 点 ,办 为 从 一 1< zx 去 1 的 初 值 出 发 ,迭代 序列 都 收敛 到 0 .而 1 是 一 个 
排斥 点 ,因为 从 0 过 x。 之 1 的 初 值 出 发 ,迭代 序列 收 化 到 0 ,而 从 xz。 > 1 的 初 
值 出 发 ,迭代 序列 发 散 到 无 穷 . 

如 果 fC) 二 way) = wa fu) = ;uj 2 
tt 形成 一 个 六 循环 . 我 们 用 本 一 和 一 人 一直 一 记 这 个 事实 . xn 
称 为 一 个 周期 点 ,ti xs， 称 为 一 个 周期 轨道 . 显然 ;不 动 点 就 是 周期 为 
1 的 周期 点 . 类 似 于 不 动 点 ,如 果 所 有 附近 的 点 在 迭代 过 程 中 都 趋向 于 某 个 周 
期 点 , 则 该 周期 点 称 为 吸引 点 . 如 果 所 有 附近 的 点 在 选 代 过 程 中 都 远离 它 而 
去 , 则 该 周期 点 称 为 排斥 点 . 如 果 点 :最 终 落 于 某 个 循环 之 中 , 则 称 它 是 一 个 
预 周期 点 . 例如, 1 是 f(x) = x 一 1 的 预 周 期 点 . 


ee en nap ew tm Pv om ee re 
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13.2 二 次 函数 的 和 迭代 


我 们 将 从 形 如 f(x) = azkl 一 xz) 的 二 次 函数 开始 向 和 迭代 
Kati = FT) = ari(l ~ Ti) k=0,1,." {1) 

这 里 ,a € [0,4] 是 一 个 参数 . 

为 了 从 玫 何 颠 观 上 观察 迭代 是 否 收 仿 ,我 们 先 按 如 下 方法 徽 出 一 个 迭代 
的 可 视图 形 . 

在 平面 直 坐 标 系 中 , 画 出 y = f(x) 及 y 二 x 的 函数 图 人 象 .在 xz 轴 上 取 一 
个 初 值 x。 ,从 如 出 发 做 平 行 于 > 轴 的 直线 , 它 与 y = f(x) 的 图 象 相交 于 一 
点 - 接着 从 该 点 出 发 做 平行 于 z 轴 的 直线 与 ?一 工 的 图 象 相 交 于 一 点 . 然后 再 
从 交点 出 发 做 平行 于 y 轴 的 直线 与 y 二 flx) 的 图 象 相 交 于 一 点 . 这 个 过 程 一 
直 进 行 下 去 ,你 将 得 到 一 个 类 似 阶 梯 或 螂 蛛网 的 图 形 . 它 正 是 函数 y= f(x) 
的 迭代 过 程 的 几何 形式 . 


练习 1 


编程 实现 函数 谈 代 的 几何 做 图 过 程 , 对 几 组 不 同 的 参数 值 4( 如 a 一 0.5， 
1,4 ) 以 及 初 值 ro ,观察 迁 代 序列 是 否 收效 ,并 比较 结果 . 


练习 2 


取 参 数 a 一 0.8，, 并 使 用 不 同 的 初 值 ze .你 能 找 出 一 个 吸引 的 不 动 点 吗 ? 
一 个 排斥 的 不 动 点 吗 ? 哪些 初 值 收效 到 吸引 的 不 动 点 ? 哪些 初 值 使 序列 发 散 
到 无 穷 ? 取 不 同 的 初 值 4 二 1,4 二 1,6,4 二 2,4a 二 2.5 回答 同样 的 问题 . 


找 出 一 个 a 值 , 它 对 应 的 选 代 具有 2 周期 点 , 这 种 性 质 依 赖 于 初 值 哆 ? 你 
能 找到 多 个 a 值 具有 这 种 性 质 吗 ? 


练习 4 


你 能 对 任意 的 上 找到 一 个 a 值 ,使 得 它 对 应 的 选 代 具 有 上 :周期 点 吗 ? 哪些 
上 值 能 给 出 上 周期 点 ? 在 每 种 情况 下 ,结果 是 否 依 赖 于 初 值 的 选取 ? (请 对 
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3.4 扫 ce 有 委 3.6 和 3.6 委 aa 委 4 的 值 进行 验证 ). 


如 果菜 个 ae 值 能 给 出 周期 点 , 它 是 否 一 定 是 吸引 的 周期 点 ?你 能 否 找到 排 
斥 的 周期 点 ? 


根据 前 面 的 一 系列 练习 , 斌 着 从 理论 上 分 析 : f(T) 的 不 动 点 是 入 么 ? 对 
哪些 a 值 选 代 收 人 效 到 每 个 不 动 点 ? 哪些 初 慎 收效 到 不 动 点 ? 哪些 初 值 导致 发 
巩 ? 对 周期 点 做 类 似 的 分 析 . 


13.3 Feigenbaum 


本 节 我 们 对 不 同 的 a 系统 地 观察 选 代 人 17? 的 行为 ， 

将 区 间 (0,4] 以 某 个 步 长 Aa (如 Aa = 0. 04 ) 离 散 化 . 对 每 个 离散 的 < 值 
做 选 代 人 1) ,忽略 前 50 个 选 代 值 rz ,x5o ;而 把 点 (ayTsl)，(Cayzsz)，， 
《ayxioo) 显示 在 坐标 平 而 上 .最 后 形成 的 图 形 称 为 Feigenbaum 图 


观察 Feigenbaum 图 .在 它 的 左 部 有 一 条 曲线 ,这 代表 选 代 具有 唯一 的 吸 
引 不 动 点 . 

(1) 从 某 一 点 al 开始 ,该 条 曲线 分 成 两 条 曲线 ,这 说 明了 迁 代 的 什么 性 
质 ? 选 代 的 点 列 是 如 何 运 动 的 ? 

(2) 再 在 下 一 个 分 支点 dz， 曲线 分 成 凡 个 分 支 ? 这 说 明 迹 代 的 什么 性 质 ? 
相应 的 迹 代 点 列 是 如 何 运动 的 ? 

(3) 上 述 分 支 过 程 是 否 一 直 进 行 下 去 ? 是 否 存在 一 个 极限 的 分 支点 Ce ? 
在 极限 分 支点 之 后 ,Feigenbaum 图 是 否 显 得 很 混乱 ? 

(4) 估 计 出 an 一 1,2,3,4,5 等 的 值 , 再 计算 比值 让 二 
(as 一 Qs_1)/ anti 一 44) ,7 二 2,3,4 等 .它们 是 否 比 较 接近 ? 由 此 猜测 数列 G， 
是 否 会 收 人 敏 ? 
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练习 8 
在 Feigenbaum 图 的 右 部 ,你 应 当 能 看 到 一 个 由 三 条 曲线 穿 过 的 空白 带 ， 


它 是 一 个 “周期 为 3 的 窗口 ”你 能 找到 其 它 窗口 吗 ? 它们 的 周期 是 什么 ? 窗口 
里 有 什么 图 案 ? 这 些 窗 口 跟 练 习 4 中 的 六 周期 轨道 有 什么 关系 ? 


13.4 混沌 的 特性 


从 极限 分 支点 之 后 ,Feigenbaum 图 显得 很 杂乱 ,似乎 没有 任何 规律 . 实际 
上 ,对 任何 初始 值 做 选 代 都 会 得 到 同样 的 结果 , 这 就 是 所 谓 的 混沌 现象 . 迄今 
为 止 ,混沌 并 没有 确切 的 数学 定义 . 但 它 具 有 一 些 基 本 的 特 人 性 ,如 对 初 值 的 敏 
感性 以 及 某 种 无 序 性 ,由 此 产生 类 似 于 随机 的 现象 . 下面 ,我 们 以 a = 4 为 例 
来 说 明 氨 代 (1) 具 有 这 些 特性 . 


1. 对 初 值 的 敏感 性 
所 谓 -- 个 选 代 对 初 值 是 敏感 的 意思 是 ,无 论 两 个 初 值 如 何 接近 ,在 选 代 过 
程 中 它们 将 渐渐 分 开 . 这 是 任何 一 个 混沌 系统 都 具有 的 特性 之 一 . 这 种 特性 使 
得 混沌 系统 会 产生 似乎 是 随机 的 .没有 规律 的 现象 下面 ,我 们 考察 迭代 
Tetl = Ax, 一 0， n= 0 (2) 
是 否 具 有 这 种 性 质 . 


性 取 两 个 初 值 使 得 它们 之 间 的 差 的 绝对 值 不 超过 0.1 ,在 选 代 过 程 中 它 
们 逐渐 分 开 吗 ?如 果 两 个 初 值 之 间 的 差 的 绝对 值 不 超过 0.01 ,0.001 ,结果 会 
如 何 ? 由 此 得 出 ,函数 f(X) 二 4X(1 一 Xx) 的 选民 对 初 值 是 否 艇 感 ? 


2. 混沌 不 是 随机 的 

从 上 面 的 实验 可 以 看 到 ,一 个 简单 的 .确定 的 二 次 迭代 可 以 产生 非常 复杂 
的 .看 似 随机 的 行为 .但 是 ,混沌 不 等 于 随机 . 实际 上 ,在 混沌 区 域 之 内 ,蕴涵 着 
许多 有 序 的 规律 . 这 正 验 证 了 哲学 上 的 名 言 : 有 序 中 包含 了 无 序 ,无 序 中 包含 
着 有 序 ， 
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从 不 同 的 初 值 ze E (0,1) 出 发 做 多 代 (2). 统计 迭代 点 列 中 分 别 落 于 区 


间 | 0, 二 | 以 及 区 间 | 去,1| 中 的 点 的 个 教 . 你 得 到 的 结果 是 随机 的 吗 ? 进 一 
步 ,将 (0,1) 区 间 分 成 任意 等 份 ,统计 选 代 点 列 中 分 别 落 于 不 同 的 等 份 区 间 的 
点 的 个 数 . 体 的 结论 又 如 何 ? 在 区 闻 [0,1] 的 各 科 划 分 中 ,是 否 有 一 些 区 间 即 


使 在 大 重 的 选 代 之 后 也 不 包含 任何 迁 代 点 ? 


另 一 个 说 明 混 沌 不 是 殖 机 的 事实 是 ,混沌 区 域 有 许多 有 序 的 窗口 .将 这 些 
窗口 放大 可 以 看 到 令 人 振奋 的 自 相 似 现象 ,同时 还 有 许多 周期 轨道 . 

练习 10 确定 迭代 (2) 的 一 个 2 霹 期 点 . 该 周期 点 是 吸引 点 还 是 排斥 点 ? 找 
出 该 周期 点 的 一 个 有 理 和 逼 近 ( 误 差 尽 量 小 ) 做 初 值 ,利用 (2) 做 迭代 . 迭代 结果 
是 否 象 一 个 周期 为 2 的 循环 轨道 ? 


13.5 其 它 沙 数 的 迭代 


和 函数 了 (x) = 47(1 一 z) 一 样 有 着 混沌 行为 的 区 数 还 很 多 . 其 中 较 简 单 
的 有 “帐篷 函数 ”和 “锯齿 函数 ”. “帐篷 函数 ” Tx) 定义 为 


2x 如 果 0 攻 < 世态 
T(x)=4 
2(1 — x) 如 果 士 < zs 1 


“锯齿 函数 ”S(z) 定义 为 


2 如 果 0 忆 < 之 二 
QZ) 一 1 


2xr 一 工 如 果 广 之 + 过 1 


容易 验证 ,帐篷 函数 和 句 齿 函数 有 下 列 关 系 : 
T(T(x) =T(S(z), 0&rel (3) 


妃 光 函数 对 初始 条 件 是 否 孝感 ? 找 出 锯齿 函数 的 的 所 有 周期 点 (提示 : 杷 
教 值 表 示 成 二 进 制 形式 ). 
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帐 莲 浮 数 对 初始 条 件 是 否 散 感 ? 找 出 帐 么 函数 的 的 所 有 周期 点 (提示 : 利 
用 关系 式 (3). ) 


寻找 帐篷 函数 和 饮 此 函数 的 周期 点 相对 比较 容易 . 但 要 求 得 六 >) = 
47(1 一 x) 得 周期 点 就 要 困难 许多 . 如 果 有 一 种 方法 能 够 在 较 复 染 的 函数 与 
较 简 单 的 函数 之 间 进 行 变换 , 则 我 们 可 以 借 此 找 出 那些 难以 捉摸 的 周期 点 . 实 
际 上 ,如果 令 

h(x) 一 sin’ (nr/2) 
则 
产 (PCz))》 = ARCT Cx)) 

对 任意 正 整 数 二 成 立 . 


你 能 否 利用 上 述 关 系 式 求 出 了 (Xz) 的 4 周期 点 ?该 周期 点 是 吸引 的 还 是 排 
斥 的 ? 


除了 遍 数 f(x) = 二 4z(1 一 zx) 外 ,还 可 以 观察 其 它 沟 数 的 迭代 . 下面 是 其 
中 的 某 岂 个 函数 . 有 兴趣 的 读者 可 以 对 它们 的 选 代 行为 进行 类 似 的 探讨 ,并 与 
-zz) 的 选 代行 为 做 比较 ， 

1. f(x) =a— (rxr— vay 

2. f(x)= ri:—a 

3, f(z) = asin(z)》 

4. f(T)=x—a 


13.6 了 昕 一 昕 混沌 


在 本 实验 的 最 后 ,让 我 们 来 听 一 听 混 沌 的 一 个 吸引 子 ,一 个 2 循环 ,一 个 
4 循环 的 声音 是 什么 样子 的 . 


5 本 


选取 ro 的 一 个 初 值 (如 Xo 二 0.1 ), 利 用 (2) 人 散 选 代 得 到 上 序列 Xnsn = 0,1, 
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…， .根据 zx 的 大 小 确定 相应 的 音调 的 高 低 . 试 编程 按 顺 序 演奏 选 代 序 列 、 


附录 ”Mathematica 程序 
本 实验 中 的 主要 程序 . 
1. 选 代 的 几何 图 形 . 


IterGeo[u_,x0_] : 一 

Module[ 

{pl1,p2,i,pointlist — {} ,var — xO,fvyar — ux x0O* (1 OO— x0)}, 

pl = Plot[ {uxx* (1 — x),x}, {x,0,1), 

DisplayFunction 一 > [dentity |; 

AppendTo[ pointlist, {x0,0} ]; 

For[i = 1,i< 20,i 二 十 ,AppendTo[pointlist, {var ,fvar}]; 
AppendTo[ pointlist, {fvar ,fvar; |]; 
var = fvar;fvar = y *war x* (1 — var) |]; 

p2 = ListPlot[ pointlist, PlotJoined 一 > True， 
DisplayFunction 一 > [Identity ] ; 

Show[ {pl1,p2} ,DisplayFunction -> $ DisplayFunction ] 

] 


2. Feigenbauin 图 (将 区 间 [0,4]” 等 分 ,x0 为 迭代 初 值 ). 


Feigenbaum[n_Integer,x0._1: = 

Modulef 

{plist = {},a,i,temp ,pilist = {}}, 

For[a = 1;a <= na 二 + ,temp = x0;plist = {}; 
Forfi=1,i<= $0,i 十 十 ,temp 一 4xaxtempx(l1 一 temp)m]i; 
For[i=51,i<= 100,i 十 十 :temp 一 4xaxtempx(1 一 temp)y/ nm; 

AppendToLplist, {4a/n,temp} ||; 
AppendTo[ pilist, ListPlot[ plist , 
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PlotStyle ~> {PointSize[0. 005]}, 
DisplayFunction 一 > Identity ) ] 
]s 
Show[pilist , DisplayFunction 一 > $ DisplayFunction | 


] 


3. 选 代 (2) 对 不 同 初 值 的 迁 代 结果 的 差 . 


Sensitivity[n. Integer,x01_,x02_]:= 
Module[ 
{pilist = {},i,templ 一 x01,temp2 = x02}. 
For[i 一 工 i 一 一 mi 十 十 ,templ = 4*templ x (1 ~— temp1); 
temp2 = 4*temp2* (1 一 temp2); 
AppendTo[pilist , {i,temp2 一 temply]y 
] 
ListPlot[pilist ,PlotJoined —> True] 
] 


4. 对 初 值 x_0 做 次 选 代 ,迭代 点 在 m 个 等 分 区 间 中 的 分 布 情况 ， 


Distrib[n_Integer ,m. Integer ,x0_]' = 
Modulel 
{i,temp = x0,count = Table[0, {i,m)}}}, 
For[li = 1,i 一 一 mi 十 十 ,temp = 4*temp(1 — temp); 
Ifftemp= 二 41,count[ [Cm] 十 十 ,count[[Floor[temp x m]+i] 十 十 了 
]s 
BarChart[ count ] 


] 
在 应 用 此 程序 之 间 需 要 调用 Graphics 程序 包 , 即 要 读 人 文件 Graphics, m 


5. 演奏 混沌 (对 初 值 x_0 做 次 迭代 ,然后 演奏 所 得 的 选 代数 列 ). 
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PlayChaos[n_Integer,x0_] : 一 
Module[l 
= {i,temp = x0}， 
For[i = 1,i<= ni 二 二 ,temp = 4*temp * (1 — temp); 
AppendTo[t,Floorftemp * 100]]]; 
ListPlay[t,PlayRange > (0,100) ,SampleRate > 5] 
] 
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实验 十 四 密 码 


保密 通讯 在 军事 、 政 治 .经 济 斗 争 和 竞争 中 的 重要 性 是 不 言 而 喻 的 . 

在 斗争 或 竞争 中 ,一 方 要 将 信息 传递 给 已 方 的 接收 者 ,同时 又 要 防 目 其 他 
人 (特别 是 敌 方 ) 知 道 信 息 的 内 容 . 他 采用 的 一 种 方式 是 :将 原来 的 信息 ( 称 为 
明文 ) 经 过 加 密 , 变 成 密 文 之 后 发 送出 去 ,使 敌 方 即使 得 到 密 文 也 读 不 懂 ,而 合 
法 的 接收 者 收 到 密 文 之 后 却 可 以 按照 预先 约定 好 的 方法 加 以 解密 ,再 翻译 成 
明文 . 而 敌 方 却 要 千方百计 从 密 文 破译 出 明文 来 . 一 方 如 何 编制 密码 使 之 不 易 
被 破译 , 另 一 方 则 要 找到 其 弱点 加 以 破译 ,这 就 构成 了 密码 学 的 主要 内 容 . 


14.1 单 表 密码 


一 提起 加 密 ,你 也 许 就 会 想 :一 个 人 关 在 屋 里 编造 出 一 个 稀奇 古怪 的 加 密 
方法 ,不 告诉 别人 ,别人 就 不 可 能 猜 出 来 了 . 下 面 的 加 密 方 案 就 很 符合 你 这 种 
想法 ， 

单 表 密码 :假定 明文 用 英文 撰写 . 将 明文 中 的 每 个 字母 用 另 一 个 预先 指定 
的 字母 代替 ,就 得 到 密 文 . 每 一 个 字母 用 哪 一 个 字母 代 装 ,你 可 以 随心 所 欲 ,但 
必须 预先 规定 好 ,并 且 让 你 的 信息 的 合法 接收 者 知道 ,他 才能 正确 地 解密 , 而 
且 , 明 文中 不 同 的 字母 在 密 文 中 也 必须 不 同 ,否则 也 无 法 解密 .也 就 是 说 ,你 的 
加 密 方案 是 将 26 个 英文 字母 作 一 个 泗 换 o . 明文 中 的 字母 经 过 这 人 么 一 替换 ， 
就 变 成 一 份 而 目 全 非 的 密 文 . 你 的 蔡 换 方案 , 既 可 以 采用 某 种 算法 ,也 可 以 没 
有 任何 规律 ,只 是 随意 制作 一 张 对 照 表 ,按照 这 张 表 进 行 加 密 和 解密 .( 需 要 指 
出 :制作 密码 表 并 由 加 密 者 及 接收 者 保存 密码 表 ,就 产生 了 密码 表 被 偷窃 的 危 
险 . )26 个 字母 的 所 有 置换 的 个 数 多 达 26! = 108 ,你 从 中 任 选 一 个 ,别人 是 不 
可 能 对 如 此 多 的 置换 一 个 一 个 审查 来 破译 你 的 密码 的 . 这 个 密码 方案 岂 不 是 
很 难 攻 破 了 吗 ? 

为 了 看 出 单 表 密码 方案 的 破绽 ,请 先 做 以 下 练习 . 


练习 1 


任意 选 一 篇 普通 的 英文 文章 . 
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(1) 统 计 每 个 英文 字母 在 文章 中 出 现 的 次 数 . 计算 出 每 个 字母 出 现 的 次 孝 
在 总 的 字母 个 数 中 所 占 的 百分比 . 再 换 风 入 文章 做 同 祥 的 统计 ,比较 统计 的 
结果 . 

(2? 统 计 每 一 种 双 字 母 组 合 出 现 的 次 数 在 总 次 数 中 所 占 的 可 分 比 , 从 中 选 
出 出 现 频率 最 高 的 双 字 母 组 合 . 


通过 上 面 的 练习 ,你 会 发 现 :各 个 英文 字母 在 文章 中 出 现 的 频率 是 不 均衡 
的 ,其 至 还 有 相当 大 的 雁 殊 . 同一 个 字母 在 不 局 文章 中 出 现 的 频率 当然 不 会 完 
全 相同 ,但 也 星 现 出 相当 的 稳定 性 ,起伏 不 大 . 根据 所 统计 的 数据 ,就 得 出 了 破 
译 单 表 密 码 的 如 下 方法 :对 经 过 单 表 密 码 加 密 的 密 文 中 每 个 字母 出 现 的 频率 
以 及 双 字母 组 合 出 现 的 频率 进行 统计 ,与 英文 字母 在 文章 中 出 现 锁 率 的 统计 
数据 进行 比较 ,就 可 能 猜 出 密 文 字母 代表 哪个 明文 字母 . 比如 :大 量 的 统计 结 
果 表 明 , 字 母 c 在 英文 文章 中 出 现 的 频率 最 高 , 约 为 12.7%. 如 果 发 现 密 文中 某 
个 字母 出 现 的 频率 最 高 , 搂 近 12. 7% ,就 很 有 理由 认为 这 个 字母 代表 明文 字母 
e, 对 密 文中 其 它 字母 也 是 这 样 ,查看 它 在 密 文 中 的 出 现 频率 与 哪个 明文 字母 
出 现 频 率 相近 ,这 个 密 文 字母 就 很 有 可 能 代表 那个 明文 字母 , 这 说 明 , 由 于 英 
文字 母 在 文章 中 出 现 频率 不 均衡 ,而 单 表 密 码 将 这 种 不 均衡 性 保存 了 下 来 ,就 
为 破译 这 种 密码 提供 了 强 有 力 的 信息 . 当然 ,实际 的 破译 过 程 没 有 这 么 简单 ， 
有 可 能 由 于 密 文 不 够 长 ,统计 规律 不 明显 . 有 些 字母 的 出 现 频率 相差 不 大 , 难 
以 区 分 .但 只 要 有 一 部 分 出 现 频率 与 众 不 局 的 字母 先 被 破译 出 来 了 , 密 文 就 已 
器 出 了 破绽 . 再 结合 对 于 语言 的 知识 以 及 对 于 密 文 的 可 能 内 容 的 猜测 等 等 入 
息 ,经 过 不 铮 的 努力 ,就 有 可 能 破译 出 密 文 的 内 容 . 这 说 明 , 单 表 密 码 有 严重 破 
绽 , 不 是 好 的 密码 方案 . 
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鉴于 单 表 密 码 的 主要 缺陷 在 于 字母 出 现 频 率 的 不 均衡 性 ,密码 编制 者 就 
想 办 法 克服 这 一 缺陷 . 办 法 之 一 是 用 多 表 密码 代替 单 表 密码 . 比如 ,他 准备 几 
张 不 同 的 密码 表 轮 流 使 用 . 这 样 , 明 文中 同一 个 字母 被 不 同 的 密码 表 加 密 ,被 
置换 成 不 同 的 字母 . 而 不 同 的 字母 通过 加 密 之 后 反而 可 能 变 成 同样 的 字母 . 字 
母 出 现 频率 的 不 均衡 性 被 搅乱 了 ,就 可 能 比较 均衡 . 比如 ,明文 字母 e 在 密 文 
中 被 变 成 了 几 个 不 同 的 字母 , 它 的 高 的 出 现 频率 也 就 被 分 散 了 .被 隐藏 起 来 
了 . 这 样 ,破译 者 就 失去 了 可 乘 之 机 . 鉴于 制作 并 保存 密码 表 就 存在 密码 表 被 
偷窃 的 危险 ,下 面 建议 一 种 不 用 密码 表 的 的 多 表 密 码 方案 . 它 是 法 国 密码 学 家 
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维 吾 尼 亚 设计 的 , 称 为 维 吉 尼 亚 密码 . 它 采 用 加 法 密码 作为 单 表 密码 ,用 不 同 
的 加 法 密码 来 构造 多 表 密 码 . 

加 法 密码 :将 26 个 英文 字母 从 a 到 z 按 顺序 排列 ,并 甩 认 为 z 后 面 是 a. 
秘密 取 定 0 到 25 的 一 个 整数 x . 将 每 个 明文 字母 在 英文 字母 表 上 向 后 移动 a 
个 位 置 , 得 到 的 字母 作为 密 文字 母 . 这 样 得 到 的 密码 叫 向 加 法 密码 . 每 个 加 法 
密码 由 一 个 整数 & 决定 , 猜 出 了 a ,就 找到 了 攻破 这 个 密码 的 锅 匙 , a 是 加 密 
和 破译 的 关键 , 称 为 密 钥 . 

比如 , 取 3 作为 密 钥 . 则 明文 的 aybc,… ,wx:yyz 依次 被 d ,esf,*…… ,2， 
abic 就 得 到 密 文 . (这 是 古 罗 马 的 将 军 凯 撤 曾 经 用 过 的 密码 . ) 

如 果 取 0 作 密 锅 , 就 等 于 没有 加 密 , 这 当然 是 不 好 的 . 即使 不 用 0 作 密 锅 ， 
加 法 密码 本 身 也 是 不 好 的 : 密 锅 & 只 有 25 种 可 能 性 ,一 个 一 个 穷 举 就 可 以 攻 
破 .但 假如 在 加 密 过 程 中 更 换 密 钥 ,就 不 容易 被 破译 了 . 但 是 ,如 果 毫 无 规律 地 
随意 更 换 , 则 自己 人 也 不 能 译 出 来 , 达 不 到 传送 信息 的 目的 . 最 好 是 按照 某 种 
规律 更 换 密 钥 ,但 这 种 规律 不 容易 被 人 犹 出 来 . 维 吉 尼 亚 密 码 就 是 这 样 做 的 . 

维 吉 尼 亚 密 码 ; 自 己 想 好 一 个 英文 单词 作为 密 锅 . 比如 ,用 codebreaking 
作 密 钥 . 单词 中 的 每 个 字母 代表 一 个 单 表 密码 . 比如 ,第 一 个 字母 c ,表示 明文 
的 a 在 密 文 中 要 变 成 c, 向 后 移动 了 两 位 ,这 就 代表 以 2 为 密 锅 的 加 法 密码 . 明 
文中 的 第 一 个 字母 要 用 这 个 加 法 密码 加 密 , 用 它 向 后 移动 2 位 后 的 字母 代替 . 
第 二 个 字母 是 o, 从 a 到 o 要 移动 14 位 ,明文 的 第 二 个 字母 用 密 锅 14 的 加 法 
密码 加 密 . 依次 类 推 , 密 钥 字 codebreaking 表 示 将 明文 中 的 前 12 个 字母 分 别 
用 密 锅 为 2,14,3,4,1,17,4,0,10,8,13,6 的 加 法 密码 加 密 . 然后 又 重复 使 用 
密 钥 字 , 将 以 下 的 12 个 字母 再 依次 用 这 些 密码 加 密 . 如 此 反复 使 用 ,直到 整 篇 
文章 被 全 部 加 密 . 


找 一 篇 稍 长 一 些 的 英文 文章 . 统计 各 个 英文 字母 在 其 中 出 现 的 频率 (也 就 
是 做 练习 1), 然后 , 选 定 一 个 密 钢 字 , 用 上 述 的 维 吉 尼 亚 密 码 加 密 , 再 对 密 文 
重新 统计 各 个 英文 字母 出 现 的 闫 率 ,看 这 些 频 率 的 是 否 还 有 显著 的 差别 、 


采用 多 表 密 码 之 后 ,各 个 字母 出 现 频率 的 差别 被 抹杀 了 . 但 是 ,由 于 不 同 
的 密码 表 的 更 换 是 周期 性 的 ,仍然 给 破译 者 留 下 了 可 乘 之 机 . 比如 ,上 面 的 密 
钥 字 长 度 是 12, 密 码 表 更 换 的 周期 是 12. 如 果 知 道 了 这 个 周期 ,即使 不 知道 密 
钥 字 ,也 能 用 破译 单 表 密 码 的 方法 来 破译 它 . 方法 是 :将 密 文 的 前 12 个 字母 排 
为 第 一 行 ,以 下 12 个 字母 排 成 第 二 行 ,再 下 面 12 个 字母 排 成 第 三 行 , … , 照 
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此 下 去 ,每 12 个 字母 排 成 一 行 ,各 行 上 下 对 齐 . 这 样 , 每 一 列 的 字母 都 是 用 同 
一 张 密码 表 加 密 ,可 以 按照 单 表 密码 的 破译 方法 来 破译 ,实际 上 可 以 按 加 法 
密码 来 破译 ). 

假如 预先 不 知道 密 钥 字 的 长 度 , 也 就 是 不 知道 密码 表 更 换 的 周期 ,能 否 先 
破译 出 这 个 周期 来 呢 ? 可 以 采用 下 面 的 方法 : 


由 一 个 同学 选 定 一 篇 稍 长 一 些 的 文章 , 选 定 一 个 密 钥 宇 , 用 维 吉 尼 亚 密 码 
加 密 , 将 所 得 的 密 文 交 给 另外 的 同学 去 破译 所 用 的 密 钥 宇 的 长 度 . 

破译 者 采用 以 下 方法 :对 了 nn 二 1,2,3,，*… ,将 密 文 向 左 移 动 n 位 排 在 原来 
的 密 文 下 面 . 这样 ,第 一 行 的 每 个 密 文字 母 所 对 准 的 第 二 行 的 字母 , 恰 是 第 一 
行 的 这 个 字母 在 密 文 中 向 后 移动 n 位 的 那个 位 置 的 字母 .依次 比较 上 下 两 行 
中 处 于 同一 列 的 字母 ,统计 出 上 下 两 个 字母 相同 的 列 在 被 统计 的 列 的 总 数 中 
所 占 百分比 .观察 对 不 同 的 nn, 这些 百分数 的 变化 情况 .是否 对 茶 个 n, 这 个 百 
分 数 显著 上 升 ? 这 说 明和 什么 问题 ? 


设 密 锁 字 的 长 度 ( 也 就 是 密码 表 的 更 换 周期 ) 为 p . 当 n 不 是 pp 的 俏 数 
时 ,每 一 列 的 上 下 两 个 字母 是 用 不 同 的 密码 表 加 密 的 , 相 下 之 间 可 以 认为 是 无 
关 的 ,两 个 字母 相同 的 概率 是 1/26 < 0.038 . 如 果 n 是 周期 p 的 倍数 , 则 上 下 
两 个 字母 是 用 同一 张 表 加 密 的 ,二 者 相同 的 概率 可 以 这 样 来 算 ; 设 26 个 字母 
ab,c,… ,x,y+z 在 文章 中 出 现 的 频率 依次 是 ,ks ，… ,不 :上 ,,- 则 上 下 
两 个 字母 同 为 a 的 概率 是 如 , 同 为 b 的 概率 是 妨 ，… .于 是 上 下 两 个 字母 相 
同 的 概率 是 如 ,如 ,yc 的 平方 和 ,大 约 是 0.065, 显 著 增 大 .〈 试 根据 你 自 
己 的 统计 数据 计算 这 个 概率 . ) 由 这 个 原理 就 可 以 破译 出 周期 p 

以 上 所 显示 的 是 如 何 利 用 统计 数据 的 不 均衡 性 破译 密码 . 这 只 是 指出 一 
个 原理 ,实际 的 密码 破译 当然 比 这 艰苦 得 多 . 但 至 少 你 应 当 获 得 一 个 印象 ,好 
的 密码 应 当 尽 量 避 免 各 种 统计 数据 的 不 均衡 性 . 


14.3 现代 序列 密码 体制 
古典 的 密码 体制 ,加 密 和 解密 都 用 人 工 或 机 械 进行 ,速度 太 慢 ,不 能 满足 


快速 通讯 的 需要 . 现代 的 密码 体制 已 是 建立 在 电子 技术 基础 之 上 . 其 中 应 用 很 
广 的 一 类 密码 是 0 -1 密码 体制 , 即 用 由 0,1 两 个 符号 组 成 的 序列 来 作为 明文 
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和 密 文 , 比如 ,由 0,1 这 两 个 数字 组 成 的 二 进 制 五 位 数 共 有 32 个 ,可 以 表示 
26 个 英文 字母 以 及 空格 .标点 符号 等 不 同 的 符号 . 于 是 任何 一 篇 用 英文 写成 
的 文章 就 可 以 用 0 - 1 序列 来 代表 了 .0-1 序列 与 英文 字符 的 这 种 对 应 可 以 
是 公开 的 ,因而 表示 英文 文章 的 这 种 0 - 1 序列 也 还 是 明文 . 在 保密 通讯 中 , 需 
要 将 这 种 以 0- 1 序列 出 现 的 明文 加 密 成 别人 读 不 懂 的 0- 1 序列 ,这 就 是 密 
文 . 合 法 的 接收 者 再 将 密 文 翻译 回 原来 的 明文 . 

假设 A4= {a;} = (4 ,4s,…) 是 表 孙 明文 的 0-1 序列 .为 了 将 它 加 密 成 作 
为 密 文 的 0-1 序列 C = {c,} ,加 密 者 采用 某 种 方式 产生 一 个 0- 1 序列 吾 三 
{5;) , 称 为 乱 数 流 . 加 密 者 和 合法 接收 者 可 以 用 同样 的 密码 机 产生 同样 的 乱 数 
流 ,但 要 使 别人 不 能 产生 这 个 乱 数 流 . 也 就 是 说 , 乱 数 流 是 保密 的 . 但 乱 数 流 与 
明文 无 关 , 它 并 不 带 有 需要 传递 的 信息 ,所 以 它 不 是 密 文 . 但 在 需要 进行 保密 
通讯 传送 明文 时 ,加 密 者 就 将 明文 序列 4 与 乱 数 流 序列 B 按 位 进行 模 2 的 加 
法 得 到 一 个 新 的 0- 1 序列 C 作为 密 文 发 出 去 . 具体 来 说 ,C = {c,} 的 第 i 位 
c 一 由 困 志 由 4, 吾 的 第 ;位 模 2 加 得 到 .这 里 的 “ 模 2 加 ?是 指 c, 等 于 ai 十 久 
除 以 2 的 余数 . 具体 来 说 ,加 法 表 为 

0B0=0,，0 加 1=1， 1 中 l=0 

我 们 记 C = 4 名 B .合法 的 接收 者 笋 到 密 文 C 之 后 ,自己 产生 同样 的 乱 数 流 
序列 B ,将 C 与 B 再 作 模 2 加 ,得 到 的 0-1 序列 CB 就 是 原来 的 明文 序列 
4 .而 别 的 人 由 于 不 知道 序列 B ,也 就 不 能 由 密 文 序列 C 得 出 明文 序列 A ,这 
就 达到 了 保密 的 目的 . 

怎样 产生 用 作 加 密 的 乱 数 流 序列 B? 一 个 办 法 是 用 移 位 寄存 器 . 移 位 寄 
存 器 的 构造 和 功能 可 用 示意 图 表示 如 下 : 


图 14 一 1 


其 工作 原理 是 :在 ”个 寄存 器 SSa，…，5。 中 存放 有 ) 个 元 素 9， 5，…， 
s%， 取 值 都 是 0 或 1. 寄 存 器 中 有 一 个 而 定 的 ”元 多 项 式 函 数 ?一 
Frziyzay…yvz)， 由 自 变量 zx, ( 取 值 都 为 0 或 1)? 的 每 一 组 值得 到 一 个 函数 什 
y ( 取 值 仍 为 0 或 1). 寄存 器 每 工作 一 次 ,将 S: 中 的 s 发 出 去 ,S*: 中 的 3: 移 进 
S，，Ss 中 的 ss 移 进 SS ，… ，S, 中 的 5， 移 进 ,1， 而 将 s+ = sis) 
输 人 5S, 中 ,这 样 就 完成 了 上 一 个 状态 (s1,52;…s5s) 到 下 一 个 状态 


—— rap 
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say5ysa+1) 的 转移 ,而 发 出 了 一 个 元 素 9 .然后 再 重复 这 个 过 程 , 将 Si 中 
的 ss 发 出 ,状态 转移 为 (ss sr ， 其 中 ms 二 -ss 这样 不 
浙 重 复 下 去 ,就 发 出 了 一 个 无 穷 的 0- 1 序列 5 一 《rss ,其 中 的 递 推 关 
系 式 si 一 src) 对 所 有 的 ;之 1 成 立 . 这 样 得 到 的 席 列 S 称 为 
移 位 寄存 器 序列 . 我 们 希望 把 它 作为 乱 数 流 序列 来 使 用 . 为 此 ,就 希望 别人 不 
容易 重新 把 它 产 生出 来 .注意 , S 由 移 位 寄存 器 序 列 的 初 态 (5,,54，,… sn》 和 多 
项 式 了 唯 -- 决 定 . 移 位 寄存 器 每 发 出 一 个 序列 元 素 ,状态 就 转移 一 次 . 而 不 间 
的 状态 ( 即 不 间 的 位 2 进 制 数 ) 总 共 只 有 2" 个 .状态 转移 至 多 2 人 砍 之 后 就 要 
重复 . 而 状态 一 旦 重复 ,序列 也 就 重复 , 因此 , 移 位 寄存 器 序列 是 周期 序列 , 周 
期 至 多 为 2 .为 了 不 让 人 破译 出 序列 ,周期 显然 应 当 越 长 越 好 ,为 此 就 贷 要 增 
大 =” ,但 2? 受 硬件 制造 条 件 及 成 本 眼 制 ,不 下 能 无 限制 的 提高 . 退 而 求 其 次 ,在 
?已 经 固定 之 后 ,希望 序列 的 周期 真正 达到 最 大 值 2" . 这 就 需要 选择 适当 的 多 
项 式 了 .周期 达到 2" 的 移 位 寄存 器 序列 称 为 M 一 序列 , 它 的 产生 和 使 用 比较 
复杂 ,这 里 就 不 能 多 涉及 了 . 

如 果 了 是 线性 嫩 数 (x,，…… To) 三 QT 十 下 十 aurm,( 其 中 系数 4&1,，…， 
qr 是 常数 , 取 值 为 0 或 1) ,这样 的 移 位 寄存 器 称 为 线性 移 位 寄存 器 ,此 时 她 果 
初 态 (51 82 一 (0.0 0)， 则 以 后 的 状态 永远 都 是 (0,0,… ,0)，, 序列 
全 部 由 0 组 成 . 这 样 的 序列 显然 不 能 用 作 加 密 . 六 此 ,线性 移 位 寄存 器 序列 的 
状态 至 多 只 能 有 2 - 1 个 ,周期 至 多 只 有 2 一 1 .达到 这 个 局 期 的 序列 称 为 
m -序列 .注意 ,如 果 a =0，, 则 序列 的 递 推 关 系 为 w+i = assz 十 … 十 angrs 
sr1 只 与 7 一 1 位 的 状态 (sm…se) 有关 . 这 样 的 非 零 的 状态 至 多 只 有 
2 一 1 个 ,序列 周期 不 可 能 达到 2* 一 1. 因此 ,产生 m -序列 的 线性 移 位 寄 
存 器 中 的 a 二 1. 当然 ,这 个 条 件 只 是 必要 的 而 不 是 充分 的 .到 底 怎 样 的 系数 
集合 人 ,a;,… ,a,) 能 够 产生 m -序列 ,需要 用 到 近 措 代数 的 知识 . 不 过 ,你 可 
以 用 实验 方法 先 体会 体会 . 


[练习 4| 

《1) 对 7 一 5 .选取 几 个 不 同 的 线性 函数 二 7 十 asxs 十 十 asxs ,从 性 
意 初 态 出 发 ,观察 所 产生 的 序列 的 周期 是 多 少 ? 

(2) 对 nn 二 6:7, ,10 ,用 试验 方法 各 找 出 一 个 产生 m -序列 的 线性 部 
数 工 


由 古典 的 单 表 密 码 的 破译 方法 知道 , 密 文 如 果 估 现 出 统计 性 质 的 不 均衡 
性 ,就 可 能 成 为 被 破译 方 可 以 利用 的 弱点 . 基 此 ,在 使 用 序列 密码 时 ,要 求 所 用 
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的 密 文 序列 好 象 是 一 个 随机 序列 . 由 完全 随机 的 0-1 随机 数组 成 序列 称 为 随 
机 序列 . 比如 可 以 用 仍 硬币 来 产生 :每 仍 一 次 硬币 ,如 果 正 面 朝 上 就 记 9, 反面 
朝 上 就 记 0, 这 样 得 到 的 就 是 随机 序列 . 用 作 遂 讯 的 序列 能 够 传递 信息 ,当然 
不 可 能 是 真正 的 随机 序列 . 但 我 们 希望 它 在 表面 上 看 起 来 像 是 随机 序列 ,具有 
随机 序列 的 一 些 主要 的 性 质 , 让 你 难以 把 它 和 真正 的 随机 序列 区 别 开 来 . 这 样 
的 序列 称 为 协 随机 序列 . 比如 ,以 下 就 是 随机 序列 的 几 个 重要 性 质 , 被 用 来 检 
验 伪 随 机 序 列 ， 

频数 检验 :在 序列 中 出 现 的 0 与 1 应当 近似 地 各 占 一 半 . 

序列 检验 :序列 中 相 邻 两 项 组 成 的 元 素 组 ,00,01,10,11 四 种 可 能 应 当 约 
各 出 现 1/4. 

扑克 检验 :序列 中 相 邻 5 项 组 成 的 元 素 组 ,所 有 的 2 种 可 能 性 出 现 的 频 
率 大 体 相 等 . 

自 相关 检验 :对 于 每 个 自然 数 pp ,将 序列 中 a, 二 a,j 的 频率 记 为 有 (p)， 
则 &(zp) 应 当 与 p 无 关 . 

游程 检验 :游程 是 指 序 州 中 一 连 串 相等 的 元 素 系 询 ( 同 为 0 或 同 为 1), 它 
们 前 面 或 后 面 的 元 素 与 它们 都 不 同 . 全 是 0 的 一 串 元 素 组 成 的 游程 称 为 0 - 游 
程 ,全 是 1 的 一 串 元 素 组 成 的 游程 称 为 1 -游程 . 在 随机 序列 中 ,长 度 为 1 的 游 
程 占 游程 总 数 的 1/2, 长 度 为 2 的 游程 占 游程 总 数 的 1/4, 长 度 为 3 的 游程 占 
游程 总 数 的 1/8. 一 般 的 ,如 果 游 程 总 数 超过 2"+! , 则 长 度 为 六 的 游程 约 占 游 
程 总 数 的 17(2") .要求 伪 随机 序列 也 具有 同样 的 性 质 ， 


练习 5 
用 Mathematica 产生 0 或 1 的 随机 整 教 的 函数 Random[LInteger] 产 oA 


0 一 1 随机 序列 (实际 上 它 仍 是 伪 随 机 序列 ). 再 用 练习 4 的 方法 产生 一 个 
m -序列 . 对 这 两 个 序列 进行 上 面 所 说 的 各 种 检验 . 

m -序列 的 伪 随 机 性 是 好 的 . 但 由 于 它 是 局 期 序列 ,所 以 当 p 等 于 局 期 和 
不 等 于 周期 时 的 自 相 关 函 数 k(p) 其 殊 很 大 . 另外 ,mm -序列 太 有 规律 ,并 不 适 
合 于 直接 用 作 实 际 加 密 , 还 要 经 过 加 工 才 能 实用 . 


14.4 ”公开 密 钥 


在 前 面 介 绍 的 密码 体制 中 ,消息 的 发 送 者 和 合法 接收 者 必须 预先 约定 加 
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密 和 解密 方案 ,而 这 一 方案 不 能 被 别人 (特别 是 敌 方 ) 知 道 .但 是 ,现代 社会 的 
信息 交流 日 益 频 繁 ,人 们 常常 面临 这 样 的 情况 :两 个 预先 未 联系 过 的 人 需要 进 
行 保密 通讯 ,信息 内 容 需 要 向 其 他 人 保密 . 为 此 ,发 展 出 这 样 的 密码 体制 :每 个 
通讯 者 向 社会 公布 加 密 方法 ,就 好 象 公 布 自己 的 电话 号 码 一 样 ; 但 解密 方法 则 
只 有 自己 才 知 道 . 任何 一 个 人 如 果 想 向 通讯 者 A 发 送 消 息 , 只 要 从 公开 的 “ 电 
话 号 码 本 ”上 查 出 A 的 加 密 方 法 ,将 消息 加 密 后 发 送 给 A. 而 A 再 用 自己 独自 
知道 的 解密 方法 将 收 到 的 密 文 译 成 明文 . 所 有 别 的 人 , (包括 消息 的 发 送 者 在 
内 ) ,都 不 知道 A 的 解密 方法 , 这 就 达到 了 保密 通讯 的 目的 . 当然 ,实际 上 加 密 
方案 和 解密 方案 的 原理 都 是 众所周知 的 ,而 实现 加 密 和 解密 除了 知道 原理 外 
还 需要 知道 所 用 的 参数 , 称 为 “ 密 钥 ”而 每 个 通讯 者 公布 的 是 加 密 密 钥 ,而 将 
解密 密 钥 秘 而 不 宣 . 这 样 的 密码 体制 称 为 公开 密 钥 密 码 体制 ,简称 公 钥 密码 . 
公 钥 密码 设计 的 前 提 是 :很 难 从 已 经 公开 的 加 密 密 钥 破译 出 解密 密 钥 ， 

怎样 实现 公 钥 密码 呢 ? 人 们 想 了 各 种 办 法 .下 而 介绍 的 是 RSA 体制 是 公 
钥 密码 的 一 种 , 它 的 原理 主要 基于 很 大 的 自然 数 的 因子 分 解 的 困难 . 

RSA 公 钥 体制 的 原理 和 方法 

每 个 通讯 者 秘密 选 定 两 个 很 大 的 素数 p,q .计算 出 它们 的 乘积 x = za . 
再 选 定 一 个 与 (p 一 1)(e 一 1) 互 素 的 自然 数 产 ,将 = 与 产 作 为 加 密 密 钥 公布 
出 去 . 如 下 的 加 密 方 法 预先 大 家 都 知道 . 消息 发 送 者 将 自己 的 明文 按 某 种 预先 
规定 好 的 方式 分 组 ,使 得 每 一 组 可 以 用 0 到 一 1 之 间 的 一 个 整数 mm; 来 表示 . 
于 是 明文 被 表示 为 0 到 = 一 1 之 间 整 数组 成 的 序列 mm ,ms，… . 然后 他 利用 消 
息 接 收 者 的 公 并 密 钥 ,对 序列 的 每 一 项 m: 加 密 成 0 到 = 一 1 之 间 的 另 一 整 
数 flm,) ,得 到 密 文 序列 Fom) ,fms),… 发 出 去 .由 xm 得 到 flm) 的 方法 
为 :将 mmr!*， 除 以 nn 求 余数 ,得 到 的 余数 就 是 flm). 

ms 可 能 是 个 很 大 的 数 , 没 有 必要 先 求 出 它 之 后 再 除 以 = 求 余数 . 在 由 低 
次 向 高 次 求 m 的 军 的 过 程 中 , 求 出 的 每 个 禾 都 可 以 用 它 除 以 的 余数 代替 . 
求 m 的 答 也 不 必 一 次 一 次 腾 上 去 . 而 可 以 将 m 的 圭一 次 又 一 次 地 平方 求 得 所 
有 的 2 次 寡 , 再 用 这 些 宕 相 嫌 得 出 m 的 任意 次 窜 . 

现在 的 问题 是 :消息 接收 者 怎样 解密 ? 别人 为 什么 猜 不 出 他 的 解密 方法 ? 

如 果 丙 个 整数 a,5 除 以 的 余数 相同 ,也 就 是 a 一 上 被 4 整除 ,我 们 就 称 
a 尼 模 n 同 余 , 记 为 三 bl(mod n) .这 样 ,由 mm 求 fA(m) 的 加密 方法 表达 为 
fm) 三 mC(mod #) ,可 以 说 f(m) 是 在 模 n 的 同 余 类 中 求 mr 的 产 次 宕 . 而 解 
密 方法 是 要 反 过 来 由 fCm) 求 m ,也 就 是 在 模 = 的 同 余 类 中 求 flm) 的 次 
方 根 ,这 是 很 难 的 问题 . 消息 接收 者 秘密 掌握 了 一 个 自然 数 4 作为 解密 密 钥 ， 
满足 条 件 : 对 任何 自然 数 ec , (es 和 三 a(mod mn) .有 了 这 个 密 钥 4& ,由 flm) 求 
m 的 解密 方法 就 变 得 很 简单 : Frm)7 三 mlmod n) ,只 要 求 flm) 的 喧 次 严 除 
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以 2 的 余数 就 行 了 . 

这 个 解密 密 钥 & 是 怎样 求 出 来 的 ? 别人 能 理由 公布 的 加 密 密 钼 =) 产 求 出 
解密 密 钥 4 来 ? 这 个 问题 是 RSA 保密 性 的 关键 . 

消息 接收 者 虽然 公布 了 ?za == pg 和 产 , 查 绝 不 能 公布 户 和 9 .而 别人 很 难 
将 半分 解 得 出 z,9 ,这 是 RSA 体制 保密 性 的 关键 . (由 于 现代 计算 机 技术 的 发 
展 , 大 数 分 解 问题 已 有 一 定 的 进展 ,这 对 RSA 体制 是 一 个 威胁 . ) 根 据 初 等 数 
论 的 知识 ,对 任何 整数 2, ,成 立 af4-D 了 4-0 三 a(mod n) ,这 称 为 欧 技 定理 . 
这 也 就 是 说 ,任何 整数 a 的 各 次 备 除 以 x 的 余数 组 成 的 序列 4a ,a ,et 都 
以 《2p 一 1) (9 一 1) 为 周期 ,( 不 一 定 是 最 小 周期 }. 由 于 与 (pp 一 1)(9 一 1) 互 
素 , 同 余 方程 hx 三 1(mod mn) 有 和 解 ,而 且 很 容易 用 轰 转 相 除 法 求 地 0 到 
(Pp 一 1)(g 一 1) 一 1 之 间 的 唯一 的 解 + 二 4d 来 ;这 个 解 4 满足 条 件 ha = 
1 十 (pb 一 1)(g 一 1), 有 是 某 个 正 整数 .于 是 对 任意 加 数 0 夺 m 之 nxn 有 

fim) = Cn) mth DD = mmod n) 

这 说 明了 a 确实 是 解密 密 钥 . 

求解 密 密 钥 4 的 关键 运算 是 解 同 余 方 程 hr 二 1(mod n) .在 已 知 n, 记 ， 
(Pp 一 1)(q ~ 1) 的 情况 下 ,这 是 很 容易 的 .但 现在 只 公布 了 rn.h. 别 的 人 不 知 
道 ‘也 很 难 求 出 ，p,g 因而 不 知道 (2 一 1)(4 一 1), 就 求 不 出 4 来. 由 于 
(P 一 1)(g 一 1) 很 大 ,也 不 可 能 用 穷 举 法 求 a: (= 二 1,2,3,*… ) 模 的 余数 
组 成 的 序列 的 局 期 从 而 求 出 (2p 一 1) (4 一 ). 这 就 达到 了 保密 的 目的 ， 


(1) 选 定 一 个 素数 pp (不 必 太 大 ). 列 出 一 个 表 , 每 个 底数 4 二 1,2,3,"… 占 
一 行 ,每 个 指数 久 占 一 列 , 在 第 a 行 第 让 列 填 写 a* 除 以 的 余数 .观察 每 一 行 
的 循环 周期 以 及 最 小 的 公共 周期 .哪些 行 达 到 了 最 大 周期 ? 

对 不 同 的 户 作 实验 ,看 户 一 1 是 否 总 是 各 行 的 最 小 的 公共 周期 . 

选 定 两 个 素数 p,9 {不 必 太 大 ), 列 出 一 个 短 形 表 , 便 表 中 第 a 行 第 上 列 的 
元 康 为 af 除 以 pq 的 余数 .观察 各 行 的 循环 周期 以 及 最 小 的 公共 局 期 . 

用 不 同 的 户 ,8G 作 实验 ,着 (p 一 1)(q 一 1) 是 否 总 是 各 行 最 小 的 公共 周期 . 

{2) 选 定 大 素数 户 ,9 ;以 及 与 上 二 (pp 一 1)(g 一 1) 互 素 的 正 整 数 有 二 5， 
用 实验 二 第 3.5 中 所 说 的 方法 求 不 定 方程 Ar 一 8 一 1 的 最 小 正 整 数 解 
(Xsy), 则 工 是 同 余 方程 hr 二 1(mod 5) 的 最 小 正 整 数 解 , 汉 然 小 于 5 ,可 以 充 
当 解 密 密 铀 ， 

(3) 自 己 选 定 大 素数 ,4 及 所， 计算 出 解密 密 人 铀 辽 . 向 体 的 同 伞 公布 4 一 
pq 及 六, 让 他 利用 RSA 算法 向 你 发 送 加 密 信 息 , 你 进行 解密 .看 他 能 否 破 主 
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你 的 解密 方法 . (由 于 你 所 采用 的 p,q 不 是 很 大 ,他 有 可 能 破译 你 的 解密 密 
铀 . ) 
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从 17 世纪 初 开始 ,人 类 历史 上 经 历 了 一 场 史无前例 的 技术 革命 ,以 燕 汽 
机 为 代表 的 机 器 代替 了 各 种 类 型 的 体力 劳动 . 这 场 革命 实现 了 体力 劳动 的 机 
械 化 ,从 而 极 大 地 促进 了 社会 生产 力 的 发 展 . 本 世纪 计算 机 技术 的 迅猛 发 展 又 
为 人 类 脑力 劳动 的 机 械 化 创造 了 物质 条 件 . 在 一 些 领 域 , 计算 机 已 部 分 代替 了 
人 类 的 脑力 劳动 . 其 中 最 引 人 注 目的 是 计算 机 自动 推理 能 力 的 突破 性 进展 . 
1998 年 ,IBM 公司 的 大 型 计算 机 深蓝 战胜 了 国际 象棋 冠军 卡 斯 帕 罗 夫 . 这 一 
玄 动 一 时 的 事件 被 国际 新 闻 媒 体 评 为 当年 的 十 大 新 闻 之 一 , 深蓝 战胜 卡 斯 帕 
罗 夫 带 来 的 震撼 不 仅 只 限于 体育 界 及 计算 机 学 界 ,因为 它 给 人 类 提出 了 这 样 
的 一 个 问题 :计算 机 的 智力 是 否 可 以 达到 或 超过 人 类 本 身 的 智能 ? 当然 ,现在 
扯 心 这 个 问题 未 免 有 点 杷 人 庆 天 ,也 许 计算 机 永远 无 法 达到 人 类 的 智力 水 平 . 
然而 ,让 计算 机 部 分 代替 人 脑 实现 人 力 难以 胜任 的 繁琐 的 计算 与 推理 ,使 人 类 
自身 致力 于 更 富 创造 性 的 劳动 是 非常 迫切 与 重要 的 . 正 是 基于 这 一 认识 ,我 国 
著名 的 数学 家 吴 文 俊 院 士 从 70 年 代 开 始 致力 于 数学 机 械 化 ( 即 数 学 定理 与 结 
论 的 计算 机 自动 推导 ) 的 研究 ,并 取得 了 巨大 的 研究 成 果 , 在 国际 上 获得 了 崇 
高 的 声誉 . 他 提出 的 用 于 求解 多 项 式 方 程 组 的 解法 被 国际 学 术 界 命名 为 
“ 吴 方 法 ”. 

所 谓 数 学 定理 的 机 械 化 证 明 , 即 把 某 一 类 定理 作为 一 个 整体 加 以 考虑 , 建 
立 一 个 统一 的 、 确 定 的 证 明 程 序 , 对 于 该 类 定理 中 的 每 一 个 定理 ,应 用 证 明 程 
序 进 行 有 限 步 推理 之 后 即 可 从 数学 命题 的 假设 推断 出 数学 命题 的 结论 在 若干 
附加 条 件 下 是 否 为 真 . 实现 数学 定理 证 明 的 机 袜 化 是 数学 学 科 发 展 中 的 一 次 
重大 飞 弃 . 

本 实验 将 以 初等 几何 定理 的 机 器 证 明 为 例 , 让 学 生理 解 计算 机 是 如 何 实 
现 自动 推理 的 ,并 使 学 生 认 识 机 械 化 的 数学 思想 在 数学 发 展 中 的 重要 地 位 - 


15.1 几何 问题 代数 化 
当代 电 于 计算 机 的 主要 功能 是 数值 或 符号 的 运算 与 推理 . 因此 ,要 实现 几 


何 定理 的 机 器 证 明 的 首要 步 又 是 将 几何 问题 转化 为 代数 问题 . 10 世纪 传 大 的 
数学 家 销 卡 儿 创 立 的 解析 几何 为 解决 这 一 问题 提供 了 思想 与 理论 基础 .解析 


Oo OO 
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几何 的 基本 思想 是 ,依据 不 同 的 几何 对 象 , 引 进 适 当 的 坐标 系 , 这 样 , 几 何 对 象 
以 及 它们 之 间 的 关系 就 可 以 用 代数 关系 式 描述 ,几何 问题 也 因此 可 以 转化 为 
代数 问题 求解 . 稍 卡 此 有 一 段 名 青 : 

一 切 问题 都 可 以 化 为 数学 问题 

一 切 数学 问题 都 可 以 化 为 代数 问题 

一 切 代 数 问 题 都 可 以 化 为 代数 方程 求解 

当然 , 笛 卡 儿 的 话 未 兔 说 得 有 点 绝对 ,但 它 表 明了 代数 方程 求解 的 重要 
性 . 实际 上 ,平面 几何 定理 的 机 器 证 明正 是 将 几何 定理 转化 为 代数 方程 之 同 的 
关系 判别 问题 . 

在 平面 几何 中 ,常见 的 几何 形体 有 :点 ,线段 , 角 , 三 角形 ,四 边 形 , 圆 , 权 
圆 , 抛 物 线 , 双 曲线 等 . 在 建立 了 恰当 的 坐标 系 后 ,这 些 几 何 形体 可 以 用 一 对 坐 
标 ,或 一 个 线性 方程 或 一 个 二 次 方程 来 表示 . 几何 形体 之 间 的 关系 常见 的 
有 :三 点 共 线 ,点 在 线 上 ,三线 共 点 ,两 线 平 行 ,两 角 相 等 ,两 三 角形 根 似 , 线 与 
圆 相 切 ,两 贺 相 切 等 等 . 这 些 关 系 也 可 以 转化 为 多 项 式 方程 .下 面 , 让 我 们 看 一 
个 具体 的 实例 . 

例 1 证 明 : 平 行 四 边 形 的 两 条 对 角 线 互相 平分 . 

设 平行 四 边 形 4BDC 的 两 条 对 角 线 4AD 与 BC 相交 于 入 (如 图 15 一 1 所 
示 ) ,我 们 要 证 AN 二 ND,BN 二 NC， 


C Dp 


2 


A B 
图 15 一 1 
为 将 上 述 命 题 转 化 为 代数 问题 ,我 们 建立 如 下 的 直角 坐标 系 . 取 4 为 原 
点 , 4B 为 + 轴 的 正 向 . 则 4,B8,C 虑 的 坐标 可 设 为 ; 4A= (0,0) ,B= (ui,0)， 
C 二 (uzvua) .其 中 ,usazsts 为 自由 参数 .再 设 了 = (rz 人 一 (zsyzo). 
如 果 4,B,C 确定 了 , 则 也 与 N 也 可 确定 . 因此 , zx,,zzv,xssXs 由 zytayes 所 


确定 . 
由 条 件 AB // CD 及 4AC // BD ,我 们 有 
在 二 Us 
21 Hs 
HU3 _: 
as 加 Xr Hl 


消去 上 式 中 的 分 母 ,我 们 得 到 多 项 式 方程 


pen 
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上 | 一 za 一 zs 一 0 《1》 
由 一 人 zi 一 az 一 Taztts 一 有 0 《2) 
再 出 妇 ,N,D 共 线 以 及 B,N,C 共 线 得 到 
4 
a | 
4 = Us 
3 一 Hi ia Hl 
消去 分 和 母 得 
hs 一 zi 一 at 一 0 (3) 
hi Tu WI) (xa uu 0 (4) 


这 样 ,定理 的 假设 转化 为 上 述 四 个 代数 关系 式 . 
由 AN = ND 及 BN = NC, 我 们 可 以 将 结论 转化 为 了 列 两 个 方程 


gl 一 好 一 2zxs 一 2zirz 十 好 一 0 (5) 


&z 一 27atl 一 2xatz 一 27zsts — Wf utaui= 0 (6) 
于 是 , 原 定 理 转 化 为 如 下 代数 问题 :假设 (1) 一 (4) 成 立 , 则 (5) 与 (6) 也 成 立 。 
显然 ,几何 定理 的 代数 转化 方式 与 结果 并 不 唯一 . 如 在 上 述 实 例 中 ,利用 
向量 4D 等 于 向 量 48 加 向 量 AC, 易 知 点 的 DD 坐标 为 = 《zza) 一 
《za 十 ws,ua). 于 是 我 们 有 条 件 
严 ; 一 一 2 一 zi 一 和 (7) 
hi 一 2Xz 一 za 一 0 (8) 
上 述 条 件 显 然 比 条 件 (1) 与 (2) 更 简单 . 实际 上 ,利用 (7) 及 (8) 可 以 消去 变 元 
Tl»Te ;从 而 进一步 简化 条 件 与 结论 . 


重新 考 不 例 1. 仍然 设 妇 点 为 原点 ,但 局 点 的 坐标 口 二 (ul,tz) 任意 选取 
(因而 坐标 系 随口 点 的 坐标 而 变化 )， 

《1) 吾 志 的 坐标 有 几 个 是 自由 的 ? 如 何 设 定 召 点 的 坐标 ? 

《2) 根 据 以 上 选取 ,将 例 1 中 定理 的 得 件 与 结论 转化 为 代数 方程 . 


将 下 列 几何 手 述 “翻译 ”成 一 个 或 几 个 多 项 式 方程 . 
(i) ”有 4, 如 ,C 三 点 共 线 . 

(ii》 线段 4B 与 CD 相交 于 下 . 

Gii) ”从 及 向 BC 引 重 线 ,DD 为 重 足 . 
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(iv) ”AB,CD,EF 三 线 相 交 于 一 点 . 
(v) ”有 A,B,C,D 四 点 共 圈 . 

(vi) ”BD 平分 角 4BC， 

(vii) ” AB 与 过 AA,C,D 的 辕 相 切 . 


将 下 列 定理 中 的 条 件 与 结论 转化 为 多 项 式 方程 ， 

(i) Apollonius 圆 定理 ” 设 三 角形 ABC 是 直 衣 三 角形 , A4 为 直角 顶点 ， 
则 三 角形 三 边 的 中 点 以 及 抽 在 BC 这 上 的 秋 足 共 园 . 

(ii) ”Simson 定理 P 设 为 三 角形 4BC 外 接 轩 上 一 点 .从 忆 点 向 三 由 形 
4BC 三 边 AB,BC,CA 引 季 线 , 重 足 分 别 为 L,IM,N ,求证 ;三重 足 上 ,M,N 
共 线 . 

(iii) 给 定 平面 上 的 三 角形 ABC. 分 别 以 AB,BC,CA 为 这 做 等 边 三 角 
形 A4'BC ,和信 AB'C , 八 ABC' . 则 AA! ,BB' ,CC' 相交 于 一 点 . 


通过 引进 坐标 系 , 我 们 可 以 将 几何 定理 转化 为 代数 关系 式 . 但 是 , 凡 何 定 
理 与 代数 关系 是 否 完全 等 价 ? 证 我 们 先 做 以 下 练习 ， 


再 次 考察 例 1. 取 (人 ayayytayrryanriyz) 一 (2, 1 0,2.0,1,0) .验证 上 
述 取 值 是 否 满 足 (1) 一 (4)? 是 否 满 足 (5) 及 (6)? 由 此 回答 :由 (1) 一 (4) 上 成 立 是 
否 可 以 推出 (5) 及 (6) 成 立 ? 例 ] 中 的 定理 是 否 与 转化 后 的 代数 问题 等 价 ? 你 
如 何 解释 这 种 现 家 ?如 何 将 几何 定理 转化 为 等 价 的 代数 问题 ?进一步 对 练习 2 
与 练习 3 中 的 几何 定理 (成 叙述 ) 与 其 代数 表达 式 的 等 价 问题 做 类 似 的 考察 ， 
其 中 要 特别 注意 练习 3 中 的 问题 (iii). 


F 述 练习 告诉 我 们 ,在 将 几何 问题 转化 为 代数 问题 时 要 十 分 小 心 . 一般 来 
说 ,转化 后 的 代数 问题 只 有 在 某 些 条 件 下 才 与 原 几 何 问题 等 价 . 
15.2 代数 关系 式 的 推导 与 验证 


从 上 一 节 可 以 看 到 ,要 实现 几何 定理 的 机 器 证 明 ,关键 是 要 对 以 下 问题 给 
出 系统 的 .程序 化 的 求解 方案 : 
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问题 ”给 定 多 项 式 方程 组 : 
| 一 0 


(9》 
ht Hn oH) 一 0 
其 中 4，…,uw 为 自由 参数 . 则 在 某 些 条 件 下 ,可 以 由 上 述 方程 组 推导 出 
Elven Tl = 0 (10) 


{由 于 多 个 结论 同一 个 结论 是 类 似 的 ,我 们 不 妨 设 结论 中 只 有 一 个 方程 ). 
如 果 以 Ul 9 Um 为 参数 能 从 方程 组 (9) 中 求解 出 Tl, ; 则 可 以 将 求 
得 的 值 代入 (10) 来 验证 (10) 式 . 


从 方程 组 (1) 一 (4) 中 求解 出 xX,"…' ,xT ;然后 验证 (5) 及 (6) 式 ,从 而 证 明 
人 鲍 1 中 的 定理 . 该 定 理 成 立 的 条 件 是 什么 ? 你 能 否 给 出 定理 成 立 条 件 的 几何 
解释 ? 

除了 极其 简单 的 情况 ,要 想 从 方程 组 (9) 中 求解 出 雪 yz 是 不 切实 际 
的 (读者 只 需 考 虑 练习 3 中 的 几 个 问题 即 可 ). 为 了 求解 问题 ,需要 更 加 有 效 的 
途径 ， 

回忆 在 单 变量 的 情形 ,如 果 想 从 h(x) 二 0 推出 g(r) 二 0 ,我们 并 不 需 
要 求 出 有 Cr) 二 0 的 零点 . 实际 上 ,只 需 证 明 有 (Xr) 是 8(7X) 的 因子 , 即 让 在 多 
项 式 4(7) 使 得 g(xX) 二 9(x)h(z) .对 于 具有 多 个 变量 的 问题 ,我 们 如 能 证 明 
存在 男 数 gifaly… yn Xl Ts z 一 ly n 和 使 得 

吾 一 9 天 | 十 … 十 9 内。 {11) 

则 显 热 可 以 由 (9) 式 推导 出 (10) 式 . 当然 ,函数 g; 一 般 不 再 是 多 项 式 而 是 有 
理 式 . 

我 国 著 名 数学 家 灵 文 俊 先 生 给 出 了 兢 定 关系 式 (11) 的 具体 的 构造 性 的 算 
法 ,这 一 方法 在 国际 上 被 誉 为 “ 吴 方 法 ”. 吴 方 法 主要 由 下 列 几 大 步 也 构成 ; 


。 将 方程 组 (9) 化 成 “三 角 阵 ”的 形式 ; 
fl tmnt) 一 0 
1 一 0 
(Gan Hm stl Xs) (12) 


fu Ce rT ) =0 
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。 计 算 g 被 f，"…，, 用 整除 所 得 的 余 式 ，: 
R,- | = Rem(g,f,sT,) 
R,..s = Rem(R,_ ifs 1 rs-1) 
(13》 


R, = Rem(CRi 六 ,Ti) 
其 中 Rem(R,,J,yx,) 表示 以 XX, 为 主 变 元 用 记 整 除 RR; 所 得 的 余 式 . 
。 如 果冻。 一 0 ， 则 (11) 成 立 . 
上 述 步 又 中 的 一 个 核心 算法 是 多 项 式 的 乙 除 法 . 假设 f,g 是 两 个 关于 
Tiy "ry Tsayy 的 多 项 式 , 我 们 以 y 为 主 变 元 ,将 了,g 写成 
f=ca" 二 ay 二 eo 
Te 
其 中 < 人 均 是 zyzr 的 多 项 式 . 设 ?# 妇 内 我们 以 了 为 变 元 做 了 除 以 吕 的 
带 余 除 法 , 则 
f=gg+r 
其 中 gr 都 是 关于 zzoyy 的 有 理 式 ,它们 的 分 母 都 是 加 的 某 个 次 震 ( 设 
为 s). 将 上 式 两 边 同 乘 忠 , 则 存在 关于 zi， …，<zvyy 的 多 项 式 9r 使 得 
di:f =9g+r 
此 即 所 谓 的 多 元 多 项 式 的 僵 除 法 .了 是 卫 除 以 旧 的 余 式 , 记 为 了 一 
Rem(f,gsy) .例如 ,以 y 为 主 变 元 , 二 XYy 一 y 被 8 二 Ty 一 2 的 盆 除 法 
是 : 
(rf = (riy 十 2riy 十 4z2 ~ ri)g + B87 一 27x8 
余 式 Rem(f,g,y) = B81 — 2x5. 
下 面 ,我 们 对 吴 方 法 的 实现 步 又 做 一 个 简单 的 解释 . 
第 一 步 实 际 上 完全 类 似 于 线性 方程 组 的 消 元 . 首先 ,将 方程 组 (9) 的 
nn 一 1 个 方程 中 的 变 元 Xz, 消去. 这 一 过 程 可 以 通过 多 项 式 之 间 的 仿 除 法 得 到 . 
例如 ,为 将 方程 组 
大 一 .十 
人 = 1 
中 的 一 个 方程 的 变 元 xs 消去 ,成 们 将 甩 除 以 有 得 到 及 二 Rem(hs, 有 ,x2) 一 
1 十 xi 一 zz. 再 将 站 除 以 及 得 有 一 Rern(p asyzo) 二 1 十 2X) 十 Xf 十 1 
这 样 , 我 们 将 其 中 一 个 方程 中 的 变 元 x; 消去 了 . 
在 消去 变 元 ,后 ,再 由 消去 了 ;的 一 1 个 方程 出 发 ,将 其 中 % 一 2 个 方 
程 的 变 元 7，， 消去 . 这 个 过 程 一 直 进 行 到 最 后 即 可 将 原 方程 组 (9) 化 为 三 角 
位 (12) 的 形式 . 
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吴 方 法 的 第 二 步 是 惊 次 对 fi ,7 一 ml 做 二 除法 .假设 广 关 于 主 变 元 
X 的 首 项 系数 为 ad, > i 二 1, "7. 则 
dg = qf tt Rs) 
driR,) = go fr Rs (14) 
cn 有 Ri = q+ Ro 
其 中 s 为 非 负 整数 .从 上 式 可 以 推出 ,存在 多 项 式 4; 使 得 
GD = A 十 下 十 A 十 R, (15) 
第 三 步 可 以 由 (15) 立 即 得 出 . 但 必须 注意 (11) 成 立 的 条 件 是 d,i 二 1， 
… ,nn 不 为 零 ， 


例 2 我 们 继续 来 考察 例 1 中 的 定理 .我们 已 将 该 定理 的 条 件 与 结论 化 
为 代数 方程 组 (7) 一 (8),(3) 一 (4) 以 及 (5) 一 (6). 为 了 证 明 该 定理 ,我 们 需要 
将 条 件 方程 组 化 为 三 角形 方程 组 . 首先 ,我 们 从 (3) 一 (4) 中 消去 变 元 xs 得 


fs = Rem(hsshyy Ts) 一 一 23 十 asT3 一 2223T3 十 ME3 工 13 
由 于 好, 好 已 自动 对 角 化 , 故 诛 条 件 化 成 了 对 角形 式 
乒 盖 和 一 zi 一 zs 一 0 


fi = Xs 一 zs 一 
fs = uur 十 23 一 Met3T3 十 Ur Ts 
fi = xrld ~— 1) ~ (Xs — uus 
下 面 ,我 们 验证 结论 (5)， 
R, =Rem(g,s fs Ta) =— Hz? + tart + Duiuars — ux? 
十 Ux? 十 21Ts 一 2atzrirs 一 ZusXoTs 
R, =Rem(R;, fyyTs) = (Cl — Ha)uslari 十 zz 一- 
十 Qaidars — UITt + Worl — XIE) 
R) =Rem(Rs, fsyTs) 一 (oa — Wa)ausla tt es — Xx) (ws + zi) 
R, =Rem(Ri,fi,m) = 0 
即 结论 人 5) 成 立 . 类 似 可 验证 结论 (6) 成 立 . 


用 吴 方 法 验证 结论 (6) 成 立 . 同时 检查 结论 (5) 与 (6) 成 立 的 条 人 忻 , 并 给 出 
相应 的 几何 解释 . 该 条 件 与 练习 5 中 所 得 到 的 条 件 是 否 一 致 ? 
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用 吴 方 法 证 明 Apollonius 加 定理 与 Simson 定理 ,并 给 出 定理 成 立 的 条 
件 及 其 几何 解释 . 


用 吴 方 法 证 明 练 习 3 中 的 问题 (iii). 你 成 功 了 吗 ? 如 果 没 有 有 成功, 请 检查 
一 下 原因 ,并 考虑 有 没有 办 法 去 克服 其 中 的 困难 ? 


吴 方 法 不 仅 可 以 用 来 证 明 初等 几何 定理 ,而 且 可 以 应 用 于 自动 推理 领域 ， 
即 由 变量 之 间 的 已 知 关 系 推 导出 变量 之 间 的 未 知 关系 . 


例 3 斌 推导 正 五 边 形 的 边 长 与 连接 不 相 邻 的 两 顶点 的 线段 长 之 间 的 
关系 . 

假设 正 五 边 形 ABCDE 的 中 心 为 O. 以 〇 为 原点 ,平行 于 DC 的 直线 为 横 
轴 建 立 直角 坐标 系 ( 如 图 15 一 2 所 示 ). 设 各 点 坐标 如 下 : O(0,0) , A(0,zs)， 
B(x ,Xx,), C(xs yy, D(C— Cg 9 E(— 定 1 3) 。 则 线 眉 CD 的 长 度 为 2xz ， 
线段 BE 的 长 度 为 2z, .所 以 ,我 们 只 可 推导 出 zi， rs 所 满足 的 关系 . 


图 15 一 2 
由 4BCDE 为 正 五 边 形 ,我 们 有 
由 二 Xx 十 Xi 一 Xx1 二 0， 由 BO 一 40 
hs 二 zi 二 XT 一 Xi 二 0， 由 CO 一 40 


hy = 十 (rs 一 T5 关 一 《7 一 了 2 一 (rs 一 工 ) 一 0 由 48 一 BC 
hs = i+ (rs ~ rs) — 4ri 一 0， 由 AB8=CD 
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将 上 述 方 程 组 化 成 三 角形 方程 组 得 
太一 4z3(zl 十 To 一 2 十 rz + 12) 
f= drixi 一 4 一 Tizg 47rixrs 
太一 一 2 好 十 2xzzrzs 十 4 太一 2z 十 2xzszr 
f= x? — 4xt + 27? — 2xars 

其 中 第 一 个 方程 即 给 出 了 xz, 与 rs 之 间 的 关系 : 


一 好 十 zz 十 好 一 0 


试用 吴 方 法 推导 三 角形 的 面积 与 三 边 长 之 间 的 关系 .进一步 ,你 能 否 推 出 
四 面体 的 体积 与 各 楼 边 长 之 闻 的 关系 ? 


数学 机 械 化 的 思想 及 吴 方 法 除了 在 上 述 领域 有 成 功 的 应 用 之 外 ,还 
在 纯 数 学 领域 的 各 个 分 支 ( 如 构造 性 代数 几何 ,构造 性 微分 几何 ,微分 方程 求 
解 等 ), 理 论 物 理 ,机 械 构 造 学 ,机 器 人 运动 学 ,计算 机 视觉 ,计算 机 辅助 设计 ， 
图 形 星象 处 理 等 广泛 的 领域 上 共有 重大 应 用 价值 . 


附录 “Mathematica 程序 
1. 例 2 中 利用 吴 方 法 由 (7) 一 (8) 式 及 (3) 一 (4) 式 推导 (5) 式 的 程序 . 


h1 一 xX1 一 ul 一 u2; 

h2=x2—u3; 

h3=x4 x xl—x3*u3; 

h4=x4* (u2—ul1)— (x3—ul) xu3; 

gl=xl1l” 2 一 2xxlxx3 一 2xxXd4xX2 十 x2”2; 


fl==hl 
12 一 h2 
f3 王 PolynomialRemainder[(u2 一 nl)h3,hd4,x4] 
f4 一 h4 
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R3=Simplify[PolynomialRemainder[ (u2—ul) xgl,f4,x4]] 
R2=Simplify[LPolynomialRemainderL (ul *u3—u2*u3+u3*x1) 
x* R3,{3,x3]J 
Rl1=PolynomialRemainder[R2,[{2,x2] 
RO=PolynomialRemainder[R1.,f1,x1] 


2. 例 3 中 推导 x 与 zx; 的 关系 的 程序 . 


hl 一 x1” 2 十 x3” 2 一 x5” 2; 

h2 一 x2” 2 十 x4” 2 一 x5” 2; 

h3 一 x1” 2 十 (x3 一 x5) ”2 一 (x2 一 xX1) ”2 一 (x3 一 x4) ”2; 
h4 一 x1” 2 十 (x3 一 X5)” 2 一 4xX2 ”2 


h2 一 PolynomialRemainder[h2.h1.x5 
h3 王 PolynomialRetmainder[Lh3,hli,x5 
h4 王 PoelynomialRemainder[h4,hl,x5 
hl=PolynomialRemainder[x3~ 2*hi,h4,x5] 
h3=PolynomialRemainder[h3,h4,x5] 
h3=PolynomialRemainder[h3,h2,x4] 
h2= PolynomialRemainder[x3” 2 x*h2,h3,x4] 

h?=SimplifyLPolynomialRemainder[ (4x2 ”2 一 xl1” 2) 

x* h2,h1,x3]] 


temp=hl;hi=h2;h2==temp; 


Factor[hl] 
Factor[h2] 
Factor[Lh3] 
FactorLh4}1 
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者 ”数值 计算 与 符号 计算 

数值 计算 的 结果 是 一 个 数值 ,符号 计算 是 相对 数值 计算 而 得 其 名 ,符号 计 
算 的 计算 结果 是 一 个 表达 式 , 数 值 是 表达 式 的 一 种 简单 形式 . 例如 , 因 式 分 解 
的 计算 结果 仍 是 多 项 式 , 不 定 积分 的 计算 结果 仍 是 初等 函数 . 象 PASCAL 和 
C 等 高 级 语言 ,主要 用 于 数值 计算 ,用 于 计算 各 类 表达 式 的 符号 计算 系统 是 一 
个 数学 软件 系统 , 它 主要 包括 :数值 计算 .符号 计算 .图 形 功能 和 积 序 设计 四 个 
方面 功能 . 它 含 有 功能 强大 种 类 丰富 的 内 部 函数 ,用 户 也 可 以 自由 的 定义 自己 
的 函数 并 扩充 至 系统 函数 中 . 

符号 计算 已 有 九 二 个 软件 系统 ,一 般 有 专用 系统 和 通用 系统 两 类 ,都 有 适 
合 于 从 工作 站 到 微机 使 用 的 多 种 版 本 .目前 ,通用 符号 计算 系统 有 :( 按 字母 顷 
序 罪 列 Axiom ,Macsyma、Maple、Mathematica ,Matlab .Reduce 和 Dirive 等 . 

符号 计算 系统 通常 都 有 两 种 运行 方式 :一 种 是 交互 式 , 每 发 一 个 命令 ,就 
执行 一 种 相应 的 数学 计算 ,例如 ,计算 定 积分 | zx*(11 一 sin z)dz 的 函数 全 
令 是 : 


IntegrateLx” 2C11—Sin[x]), {x,—1,1}] 


另 一 种 方式 是 写 一 段 程序 ,系统 连续 执行 一 系列 的 命令 ,就 像 用 Fortran 
或 C 写 程序 一 样 . 每 个 符号 计算 系统 都 有 自己 的 程序 设计 语言 ,这 些 语言 与 
通用 的 高 级 语言 大 同 小 异 . 

Mathematica 是 优秀 的 符号 计算 系统 之 一 .下面 简要 列 出 Mathematica 
系统 的 主要 函数 , 供 使 用 参考 . 要 进一步 掌握 和 了 解 Matbematica 的 功能 ,请 
查阅 系统 的 在 线 帮助 和 参考 有 关 的 书籍 . 


短 ” 进 人 Mathematica 
在 windows 3.x 版 中 ,在 装 好 Mathematica 2. 2 的 窗口 中 双击 Mathe- 
matica 的 图 标 [| .在 Win 95 下 ,在 “开始 ”菜单 的 “程序 ”中 单 击 “Mathe- 


matica 2. 2”. 屏幕 显示 一 个 启动 图 面 . 稍 停 片刻 ,系统 装 好 内 核 后 , 则 显示 如 
图 16 一 1 的 工作 屏幕 . 
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16 一 1 Mathematica 的 工作 屏幕 


Mathematica 中 共有 9 个 主 菜 单 和 一 些 个 工具 按钮 ,菜单 意义 文 如 
其 名 . 例如 :File 表示 文件 ,Edit 表示 编辑 ,Cell 表示 对 Cell (单元 ) 的 处 理 大 部 
分 工具 按钮 也 是 “图 ”人 、 如 文 义 ,例如 ,用 菜 力 表示 甬 切 .下 列 儿 个 常用 的 工具 


创建 ,打开 保存、 打印 Notebooks 按钮 
剪 切 复制、 粘贴、 取消 按钮 
计算 表达 式 、 动 画 . 图 形 的 Postscript ,播放 声音 


3 维 图 形 视 点 .颜色 选择 .中 断 、 帮 助 按钮 


16 一 2 常用 工具 按钮 


得 输入 和 计算 表达 式 

在 Windows 环境 下 ,工作 屏幕 象 一 张 长 长 的 草稿 纸 ， 称 工 作 屏 幕 为 
Notebook , 它 是 后 绷 是 . ma 的 文件 . 象 处 理 其 它 计 算 机 文件 一 样 ,我 们 可 以 对 
Notebook 进行 创建 .打开 .保存 .修改 和 打印 等 文件 操作 . 

在 Dos 界面 下 ,屏幕 上 先 显 示 输 入 计算 的 标记 ,“In[1] :二 ”, 用 户 在 输入 
一 个 表达 式 后 , 按 回 车 键 ,系统 立即 开始 计算 输入 的 表达 式 . 

在 Windows 环境 下 ,用 户 先 输入 一 行 或 多 行 表 达 式 ,再 发 计算 表达 式 命 
令 ( 单 击 运行 按钮 或 按 Shift 十 回 车 键 ) ,系统 完成 计算 后 输出 计算 结果 时 ,再 
显示 输 人 的 行 标记 “In[1] :一 ”需要 注意 的 是 ,在 Windows 环境 中 国 车 键 仅 
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表示 命令 之 间 的 分 隔 标 记 . 
计算 表达 式 的 命令 方式 有 : 
1) 单 击 运行 按钮 | 者 
2) 按 Shift 十 回 车 键 ; 
3) 按 键盘 右边 的 数字 键 *5”( 在 非 数字 状态 下 ). 
例如 :启动 Mathematica 后 ,输入 


Plot[Lx >” 3+3x—1,{x,—2,2}] 


单 击 运行 按钮 ,屏幕 显示 图 16 一 3. 


ZTE 


plot [x^3+3x-1,{x,-2,2}] 


Gu 人 


9 -Graphics- 


16 一 3 ”执行 一 条 命令 后 的 窗口 


为 了 紧缩 版 面 , 后 面 的 例题 中 将 同行 显示 "Infxj] :一 ”和 输 和 内容, 请 不 要 
将 "In[x] := 二” 误 认为 是 输入 的 字符 . 另外 ,用 注释 语句 (* 楼 体 *) 形 式 做 例题 


的 简要 说 明 ， 
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者 输入 了 泡 数 或 命令 的 快捷 方式 

键 人 函数 或 命令 的 第 一 个 或 前 几 个 字符 , 按 快捷 键 Ctrl 十 K ;或 在 “Ac- 
fion ” 药 单 中 选择 子 菜 单 *Prepare Input*” 的 “Complete Selection” 命 令 . 这 时 屏 
幕 上 显示 以 键 人 字符 为 首 的 函数 和 命令 列表 ,在 列表 上 单 击 某 个 函数 或 命令 ， 
系统 则 将 这 条 范 数 或 命令 粘贴 到 你 的 输入 中 . 单 击 函数 和 命令 列表 框 右边 的 
上 下 稼 头 , 可 调 出 更 多 的 冰 数 和 命令 .用 户 定义 的 郴 数 也 自动 放 在 列表 中 . 


和 退出 Mathematica 

要 退出 Mathematica ,在 “文件 ”菜单 中 选择 “Exit ”命令 或 按 *“Alt 十 F4”. 
如 果 窗 口中 还 有 内 容 没 有 保存 到 Notehook 中 ,这 时 会 出 现 一 个 对 话 框 , 系 统 
问 你 是 否 保存 , 单 击 对 话 框 上 的 “和 否 (CN)"” 按 钮 则 关闭 窗口 ; 单 击 ^ 是 (Y)” 按 钮 ， 
调 出 “SaveNotebook ”对话 框 ,等 你 输 和 人 文件 名 保存 Notebook 后 再 退出 窗口 . 
退出 后 返回 到 调和 人 入 Mathematica 以 前 的 状态 ， 


和 ”在 Mathematica 中 获取 帮助 

除了 单 击 Help( 帮 助 ?菜单 获取 帮助 外 ,在 行文 中 输入 "? 防 数 名 ”, 可 得 到 
有 关 函 数 的 调用 形式 和 相关 说 明 , 输 入 “?? 函 数 名 ”, 则 得 到 更 多 的 信息, 例如 : 

? Integrate( x 单 击 运行 按 村 ,系统 显示 如 下 x*) 

Integrateff ,xj] gives the indefinite integral of f with respect to x 

Integrate[f, {x,xmin,xmax} | gives the definite integral 

Integrafte[f ,{x,xmin,xmax},{y ,ymin, ymax} | gives a multiple integral 


?Px(C(x 列 出 以 PP 开头 的 所 有 部 数 和 实体 x*) 


一 .Mathematica 中 的 基本 量 


禾 ” 数 与 数 的 表示 

数值 类 型 

Mathematica 的 简单 数值 类 型 有 整数 ,有 理 数 .实数 和 复数 . 整数 
(Integer) 册 若干 个 0 到 9 的 数字 组 成 ,数字 之 间 不 能 有 空格 .逗号 和 其 它 字 
符 , 正 负 号 放 在 整数 的 首位 ,输入 时 , 正 号 可 省 略 不 写 , 只 要 内 存 允 许 ,Mathe- 
matica 可 以 表示 任意 长 度 的 精确 整数 ,不 受 所 用 的 计算 机 的 字 长 所 限制 .在 
Mathematica 中 允许 使 用 分 数 ,也 就 是 用 有 理 数 (Rational) 表 示 一 个 化 简 过 的 


OO 
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分 数 . 当 两 个 整数 相 除 而 又 不 能 整除 时 ,系统 就 用 有 理 数 来 表示 . 例如 :六 , 系 
统 自动 对 分 数 做 可 能 的 化 简 ,自动 约 去 分 子 和 分 母 的 公 因 子 . 输入 时 ,我 们 用 
分 子 /分 母 的 形式 ,用 除 号 隔 开 分 子 与 分 母 ,输出 时 ,系统 一 般 用 分 式 的 形式 ， 
当 分 子 和 分 母 数值 较 大 时 ,有 时 也 以 分 子 /分 母 的 形式 表示 . 


本 四 特征 说 明 
Iateger | 1234567 | 任意 长 度 的 精确 整数 
i 
任意 精确 度 的 近似 实数 
实 部 和 虚 部 可 为 整数 ,有理数 .实数 
意义 
Pi mr 一 3. 141 59 
E 自然 对 数 的 底 e 一 2.718 28*… 
Degree 让 度 ,z/180 
1 虚数 单位 i 二 V 二 
Infinity ce 无穷大 


这 些 数学 常数 都 是 精确 数 , 用 在 公式 推导 和 计算 中 ,在 公式 推导 中 数学 党 
数 多 为 精确 数 ;用 在 数值 计算 中 的 数学 常数 可 以 取 任意 精确 度 . 

数 的 输出 
N[ 表 达 式 ] 以 实数 形式 输出 表达 式 | 
N[ 表 达 式 ,mn] “| 以 n 位 精度 的 实数 形式 表示 表达 式 | 
例如 ,NLPi,30j, 取 30 位 数字 的 x. 


和 变量 

给 变量 取 名 

在 Mathematica 中 内 部 王 数 或 命令 都 是 以 大 写字 母 开 头 的 标识 符 , 为 了 
避免 混淆 ,在 Mathematica 中 变量 名 通常 以 小 写 英 文字 母 开 头 , 后 跟 字 母 或 数 
字 , 变 量 名 字符 的 长 度 不 限 . 例如 :abcdefghijk ,A,x3 都 是 合法 的 变量 名 ;而 2t 
和 u v(tu 与 v 之 间 有 一 空格 ?不 能 作为 变量 名 .在 变量 名 中 英文 字母 大 小 写意 
义 不 同 ,天 此 A 与 a 表示 两 个 不 同 的 变量 . 在 Mathematica 中 变量 即 取 即 用 ， 
不 需要 先 说 明 变 量 的 类 型 青 使 用 ， 

给 变量 赋值 

在 Mathematica 中 用 “二 或“: 二 ”起 赋值 作用 ,一 般 形式 为 : 


eT 
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变量 = 表达 式 或 变量 1= 变 量 2 一 表达 式 

变量 =. 清除 变量 的 值 

clear[ 变 量 】 ”清除 变量 的 定义 和 值 

在 Mathematica 中 “二 ”应 理解 为 给 变量 定义 一 个 值 . 在 Mathematica 中 ， 
一 个 变量 可 以 表示 一 个 数值 .一 个 表达 式 、 一 个 数组 或 一 个 轿 形 . 

变量 替换 

变量 有 两 种 获取 数值 的 方式 ,定义 其 值 是 一 种 方法 , 另 一 种 是 对 变量 做 蔡 换 . 

expr/.1ks 一 二 rhs 用 rhs 替换 expr 中 的 lhs 

expr/. {lhs1 一 二 rhsl,ihs1 一 汪 rhs1,-…) 分别 用 rhsi 替换 expr 中 的 lhsi 

例如 : 

In[1] :=f 二 x 2-1;f/.x- 和 >1(x 用 1 替换 f 中 的 Xx) 

Out[1j=2 

InE2] :二 g 二 x ”2 十 y ”2;g/. {X->2,y->1Cx 在 g 中 替换 xy 两 个 变 
量 *) 

Out[2]=5 


二 表 

循环 担 述 

表 在 形式 上 是 用 花 括 号 括 起 来 的 若 于 元 素 ,元 素 之 间 用 召 号 分 隔 . 在 运算 
中 ,可 对 表 作 整 体操 作 ,也 可 对 单个 元 素 操作 . 表 可 以 表示 数学 中 的 集合 .向量 
和 和 矩阵 ,也 可 表示 数据 库 中 的 一 组 记录 . 表 中 的 元 索 可 为 任何 数据 类 型 . 表 的 
元 素 可 为 数值 .表达 式 和 表 . 同一 个 表 中 的 元 素 可 为 不 同 的 数据 类 型 . 表 中 元 
素 较 少时 ,直接 使 用 形式 :变量 = {元 素 1, 元 素 2,…} 键 人 表 中 元 素 , 在 给 出 表 
名 的 同时 又 建立 了 表 中 元 素 . 更 多 的 时 候 和 需要 用 建 表 命 令 . 在 学 习 建 表 命令 
前 , 先 了 解 Mathematica 中 的 循环 描述 . 

循环 描述 形式 :{ 循 环 变量 ,循环 初 值 ,循环 终 值 , 步 长 } 

循环 变量 .循环 初 值 . 循 环 终 值 和 步 长 可 为 整数 有理数 和 实数 . 当 步 长 为 
1 时 可 省 略 , 当 循环 初 值 为 1 时 可 省 略 . 例如 : 

{i,max)i 从 1 到 max; {max} 重复 max 次 ; 

{i,imin ,imax} , {j, jmin, jmax } i 从 imin 到 imax, 并 对 让 的 每 一 个 
值 ,j 从 jmin 到 jmax 

建 表 函 数 

Table[ 通 项 公式 , {循环 范围 }, {循环 范围 }] 

按 循 环 范围 定义 表 , 用 通 项 公式 的 规则 定义 表 的 元 素 ,循环 范围 可 为 一 重 
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Range[ 初 值 , 终 值 , 步 长 ] 

生成 值 为 { 初 值 , 初 值 十 步 长 ,. , 终 值 ) 的 数值 表 

In[1]:— Range[3,9,2 |] 

Out[1j={3,5,7,9} 

In[2] :=b=Table[i++j—1,{i,1,3),{j,1,3}] 

Out[2]—{{1,2,3},(2,3,4),13,4,5)} 

表 的 分 量 表示 

在 上 例 中 , 当 b 表示 一 个 表 时 ,b[[2]] 表 示 b 中 的 第 2 个 子 表 , 即 第 二 行 元 素 . 
如 果 s 王 {1,3,5,7} , 那 s[[2]] 的 值 是 3; 下 列表 示 表 的 分 量 的 一 般 形式 和 实例 . 


表 的 分 量 意义 
t[[nj] 或 Part[t,n] t 中 的 第 n 个 子 表 
t[[ 一 n]] 或 Part[t, 一 n] | 倒数 第 n 个 元 素 


list 中 的 第 一 个 元 素 


First [list ] 
Last[ilist] 
t[[ {nl1,n2,*…}]] 或 


list 中 的 最 后 一 个 元 素 
Part[t, {nl,n2,n3,.……}} 
tLLi,j]j 


给 出 由 上 的 第 n1,n2,n3…. 个 元 素 组 成 的 表 
t 的 第 i 个 子 表 的 第 j 个 元 素 
表 的 运算 函数 


函数 意义 
Insert[list ,expr ,n | 给 出 在 表 list 的 第 n 位 置 插入 expr 后 的 结果 


Prepend[list ,expr } 给 出 在 表 ]ist 的 首部 插 人 元 素 expr 后 的 结果 
Append[list ,expr | 给 出 在 表 list 的 末尾 插入 元 素 expr 的 
AppendTo[list ,expr] 在 表 iist 的 末尾 插入 元 素 expr ] 


Take[list ,n ] 
Take[list, {m,n}] 
Rest[ilist ] 
Drop[list, {m,n}] 
ReplacePart[ list ,expr .n } 
后 出 表 中 元 的 数 
SortLlist] 将 表 list 的 元 素 按 照 标 准 顺序 排序 
Union[list] 去 掉 重 复 的 元 素 后 对 元 素 排序 
Reverse[ list ] 将 表 list 中 元 素 的 顺序 倒 过 来 


把 list 中 的 所 有 元 素 加 在 一 起 


Apply[Times ,list] 把 list 中 的 所 有 元 素 乘 在 一 起 


取 list 中 的 前 r 个 元 素 

取 从 m 到 的 元 素 ( 包 括 m,n 在 内 ) 
给 出 删 掉 第 一 个 元 素 之 后 的 集合 

给 出 删 掉 m 到 n 个 元 素 之 后 的 集合 
用 expr 替换 list 中 n 处 的 元 素 
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和 例 如: 

In[1]:=a={5,8,5,7,2,6}; 

In[2] :二 Apply[Plus,a]( * 将 a 中 所 有 元 素 相 加 x) 
Out[2]=33 

In[3] :二 Sort[a](x 将 表 b 的 元 素 兴 小 至 大 顺序 排列 * ) 
OutL3]={2,5,5,6,7,8} 

In[4]: 二 Reverse[ 吧 ](* 反 转 上 表 , 即 表 元 素 由 大 至 小 排列 * ) 
GOut[4] 一 {8,7,6,5,5,2} 

In[L5] :一 AppendTo[a,91( x* 定义 后 的 表 仍 可 扩充 %)》 
Out[$5]={5,8,5,7,2,6,9} 


表 的 集合 运算 
要 进行 数学 上 的 集合 运算 ,可 用 Union[listl ,list2,…] 计 算 list1 ,list2,… 
的 和 集 , 用 IntersectionLIistl ,jist2,…] 计 算 Iist1 ,list2,… 的 交集 ;用 Comple- 
mentLun ,iistl ,iist2,…] 计 算 un 对 listl,list2,… 的 补 集 . 
函数 意义 
UnionTlist1 ,list2,..*] 给 出 表 listl ,jist2,… 中 不 同 元 素 的 一 个 表 
Intersection[list1,list2,-…] ) 给 出 表 listl ,list2,… 中 公共 元 素 的 一 个 表 
给 出 在 un 中 但 不 在 表 listl,'list2,… 中 元 
素 的 一 个 表 


Complement[un ,jist1 ， 
iist2，…] 


得 初等 函数 
实 变量 的 数值 函数 
Round[x] 最 接近 x 的 整数 
Floor[x] 不 大 于 x 的 最 大 整数 


不 小 于 x 的 最 大 整数 

x 的 绝对 值 本 

符 导 函数 .x>0 时 值 为 1,x= 二 0 时 值 为 0， 
x<<0 时 值 为 一 1 

取 xl,x2,… 中 的 最 大 值 .s 为 一 集合 或 数组 | 

取 xi,x2,… 中 的 最 小 值 . s 为 一 集合 或 数组 “| 


CeilingLx] 
Abs[x | 
Sign[x] 


Max[xl1,X2,*…' |] 或 Max[s] 
Min[x1,x2,… 1] 或 Min[s] 
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| 意义 (z= 二 x 十 ly) 
Refz] 取 复数 的 实 部 
Im[Lz] 取 复 数 的 虑 部 
Conjugate[z] 共 扼 函数 
Abs[z] 复数 的 模 
Arg[z] 复数 的 幅 角 | 
变量 可 为 实数 或 复数 的 函数 意义 


Exp[z] 指数 范 数 ，e-. 
Log[z] 以 e 为 底 的 对 数 函 数 , in = 
Log[bliz | 以 5 为 底 的 对 数 函 数 ,logsz 


SinLz],CosLzj,Tan[z],Cot[zj] 


Csc[z]j,Sec[z] 


Sinh[z]j,Cosh[z],Tanh[z]， 
Coth[z] ,Csch[z],Sech[Lz] 


ArcSin[z1], ArcCos[z],ArcTan[z|, 
ArcCot[z],ArcCsc[Lz] ,ArcSec[z] 


ApcSinh[Lz],ArcCosh[z],ArceTanh[z]， 
ArcCoth[z],ArcCseh[z] ,ArcSechLz] 


正弦、 余弦 ,正切 和 余 切 函 数 
余天 , 正 外 
反 三 角 函 数 


双 曲 函数 


反 双 曲 函 数 


伪 随 机 函数 

Random[ ] 
Random[Real,xmax ,nj 
Random[ Real, 

{xmin ,xmax} |] 


Random[ Complex 
Random[Complex， 


意义 

0 到 1 之 间 的 一 个 伪 随 机 实数 
0 到 xmax 之 间 的 一 个 位 精度 的 伪 随 机 数 
xmin 到 xmax 之 间 的 一 个 伪 随 机 数 


单位 正方 形 中 的 一 个 伪 随 机 复数 
由 zmin 和 zmax 确定 的 长 方形 中 的 一 个 


{imin ,limax} | 


On 


{zmin ,zmax} ] 伪 随 机 复数 
Random[Integer | 0 或 1 的 随机 数 
Random[JInteger， imin 到 imax 之 间 的 一 个 伪 随 机 整数 
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| 整数 和 组 合 函数 | 意义 | 
Mod[m,n] m 被 n 除 的 正 余 数 | 
QuotientL[m ,nj m/n 的 整数 部 分 


GCnpLnli,n2.…] 或 GCD[s] | nl,n2,… 的 最 大 公 因 子 ,s 为 一 数据 集合 
LCM[nl,n2,…] 或 LCN[s] | nl,n2,… 的 最 小 公 倍 数 ,s 为 一 数据 集合 
Prime[k | 第 k 个 素数 


PrimeQ[n] 当 m 为 是 素数 时 为 True ,否则 为 False 
下 阶乘 na(n 一 1)(na 一 2)…1 
双 阶 乘 n(x 一 2) (x 一 4)… 


ntl! 


Binomialfn ,m | 一 项 式 系数 C2 

Permutations[list] 列 出 list 中 元 素 的 所 有 排列 
| Multinomial[al,n2，…] 多 项 式 系数 

BernouiliB[n] 伯 努 利 系 数 B， 

BernoulliB[n] 伯 努 利多 项 式 B(x) 


例 : 

in[]1] :一 BinomiailL7,2]( x 计算 Cix ) 

Out[1] 一 21 

In[2] := 二 Permuvtations[ {1,2,5)](x* 列 出 {1,2,5} 的 所 有 排列 * ) 
Out[2]={{1,2,5), {1,5,2}),{2,1,5},{2,5,1}),{5,1,2},{5,2,1}} 


移 ”算术 运算 符 和 表达 式 

算术 表达 式 由 常数 .变量 .函数 .算术 运算 符 和 括号 组 成 . 常数 和 变量 的 类 
型 有 : 整 型 有 理 数 、 实 型 .复数 型 .列表 .向 量 和 矩阵 . 函数 包括 系统 定义 的 函 
数 .用户 定义 的 函数 各 程序 包 中 的 函数 . 其 中 : 方 括号 口内 放 函 数 变量 , 花 括 号 
人 表示 元 素 的 分 界 符 , 用 圆 括号 () 组 织 运算 量 之 间 的 顺序 . Mathematica 中 的 
算术 运算 符 十 ,一 , * ,/, ”分别 表 示 加 号 . 减 号 (或 负 号 ). 乘 号 . 除 号 和 乘 
方 ;%( 百 分 号 ) 表 示 上 一 个 计算 结果 ;%% 表 示 上 上 个 计算 结果 . 

在 表达 式 中 , 乘 号 可 用 空格 符号 代替 . 在 两 个 变量 或 数值 之 间 放 一 个 空格 
即 表 示 求 这 两 个 量 的 乘积 . 在 不 引起 误解 的 情况 下 , 乘 号 可 以 省 略 . 例如 :2a， 
2x*a;28 的 意义 是 相同 的 . (a 一 b)(¢ 十 d) 与 (a 一 b) x* (ec 十 4 意义 也 是 相同 的 . 
算术 运算 的 顺序 遵守 数学 中 的 习惯 ,次 序 为 ”一 * ,/ 一 十 ,一 ， 同 级 运算 符 
遵守 从 左 到 右 的 顺序 . 
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物 自 定义 函数 

flLxj] 王 表达 式 对 指定 的 对 象 fLx 定 义 ,x 表示 某 一 具体 对 象 

fLx_] :一 表达 式 对 函数 f[xj 定 义 ,x_ 表 示 变 量 

fLx_j 一 . 取消 fLx_] 的 定义 

Clear[f ] 清除 f 的 所 有 定义 

出 现在 f[x_] 中 的 x_ 是 一 类 重要 实体 ,在 Mathematica 中 读 作 “ 空 白 ”， 
称 为 模式 , 它 表 示范 数 定 义 中 的 变量 .模式 fLx_] 可 以 代表 任何 形 如 f[any- 
thingj 形 式 参数 的 表达 式 . 如 果 在 定义 中 只 用 f[xj= 表 达 式 ,那么 这 个 规则 仅 
对 对 象 x 才 起 作用 . 

例如 

In[1j :==f[x_]: 二 2x 一 1Cx* 或 f[x ] 一 2x 一 1 *》 

In[2] := {f[10],f[0],f[Ly]} 

Out[21={19,—1,—1+2y)} 

In[3] :==g[xj=2x—1 

DutL3] 一 2x 一 1 

In[4] :一 &L10] 十 g[x](Cx* f[xj 与 g[xj] 的 区 别 在 哪里 ? # )》 

Out[L4] 一 一 1 十 2x 十 gL10] 

如 果 在 定义 函数 时 需要 几 个 命令 才能 完成 工作 ,可 将 几 个 命令 依次 排列 ， 
命令 之 间 用 逗号 分 隔 , 用 圆 括号 把 首尾 命令 括 起 来 . 如 果 在 定义 函数 时 还 要 用 
局 部 变量 ,可 用 Module 模块 . 

In[51:=a= {1,2,3,7,9}; 

In[2] :=h[x_]:={(y=Max[x];z=Min[x];y © 2 十 z” 2) 

In[3] :二 h[al 

Out[3] 一 82 


二 、 在 Mathematica 中 作 图 


狠 二 维 函 数 作 图 

Plot[ 本数 f,{x,xmin,xmax), 选 项] 

在 区 间 {x ,xmin,xmax} 上 , 按 选项 的 要 求 画 出 函数 的 图 形 . 

Plot[ {函数 1; 函数 2), {x ,xmin,xmax) ,选项 ] 

在 区 间 {x,xmin,xmax} 上 , 按 选项 的 要 求 同 时 画 出 几 个 隆 数 的 图 形 . 

Mathematica 绘图 时 允许 使 用 选项 对 绘制 图 形 的 细节 提出 各 种 要 求 和 设 
置 . 例如 :要 求 取消 坐标 轴 , 给 图 形 加 框 线 等 要 求 . 每 个 选项 都 有 一 个 确定 的 名 
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字 ,以 “选项 名 一 二 选项 值 ” 的 形式 放 在 Plot 中 最 后 边 位 置 , 如 InL3] 所 示 . 一 次 
可 设置 多 个 选项 ,选项 依次 排列 ,以 逗号 相隔 ， 
In[1] :=Plot[ xSin[L1/x], {x,—1/2,1/2}] 


《x 图 16 一 4x) 


Out[1]=—Graphics— 

In[2j := Plot[(x~ 2— x)Sin[x],/x,2,16},. AxesLabel— > {"x’". 
"fCx)*}] 

《%* 给 xX,y 坐标 轴 分 别 加 标记 "xf(x)" ,请 上 机 观看 x*) 

InL3] :=Plot[Sin[x], {x,0,3},Frame—>True,GridLines—>-Automatic | 

(x 给 图 形 加 上 框 线 和 网 格 ,请 上 机 观看 x ) | 

下 面 列 出 部 分 选项 以 及 它 的 意义 : 

AspectRatio 图形 的 高 度 与 宽度 的 比例 ,默认 值 是 1/Gol9Ratio 一 0. 618 
如 果 要 图 形 按 实际 情况 显示 ,设置 的 选项 值 是 Automatie. 

Axes 是 否 画 坐标 轴 以 及 设置 坐标 轴 的 中 心 位 置 ,默认 值 是 True , 画 出 
坐标 轴 . Axes 一 >>None 不 设 坐 标 轴 ; :Axes 一 > {x0,y0} 设 置 坐 标 轴 中 心 为 {x0， 
y0}. 

AxesLabel 设置 坐标 轴 上 的 标记 符号 . 默认 值 是 None, 不 做 标记 . 用 
{“ 字 符 串 1”,“ 字 符 串 2”} 的 形式 定义 轴 的 横 坐 标 和 纵 坐 标 标 记 . 

Frame 在 图 形 遍 用 是否 加 框 . 默认 值 是 False;Frame 一 >>True 画 出 边 
框 . 

Ticks ”设置 坐标 轴 上 刻度 的 位 置 ,默认 值 是 Automatic, 由 系统 自动 定 
位 . Ticks 一 None 不 标 坐 标 刻 度 ;Ticks 一 > {xi,yi} 规 定 x 轴 和 yy 轴 的 刻度 值 ， 
Ticks 一 > (ttyt2,…} 表 示 要 在 一 个 轴 上 按 t1,t2,… ,设置 坐标 轴 刻 度 . 

FrameLabel 是 否 在 框 的 周转 加 标志 . 默认 值 是 None， 
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PlotLabel 图 形 的 名 称 标志 . 默认 值 是 None ,不 列 标志 . 

用 ?? Pjet 可 以 看 到 Plot 所 有 的 选项 以 及 选项 的 值 . 

我 们 称 曲 线 的 颜色 .曲线 的 线形 和 线 的 宽度 等 特性 为 曲线 样式 .下 列 选 项 
用 于 设置 曲线 的 样式 . 

GrayLevel[Lg] 灰 度 比值 ,g 取 0 到 1 之 间 的 数 .0 为 白色 ,1 为 黑色 . 

RGBColor[r,g,b] 红 、 绿 \ 兰 三 色 的 强度 ,r,g 和 b 取 0 到 1 之 间 的 数 . 

ThicknessLt] 显示 线 的 宽度 为 t, 以 占 整个 图 的 宽度 的 比 来 量度. 

Dashingttdl1,92,…}] 用 虚线 段 序 列 画 线 . 

PointSize[d] 给 出 一 个 点 的 大 小 d. 

PlotStyle 一 >sl 为 所 有 向 线 规定 一 种 线 型 ， 

PlotStyle 一 >{{s1) ,fs2),…} 为 一 曲线 序列 循环 地 使 用 线 样式 . 

请 上 机 观看 In[1] 和 In[2] 的 运行 结果 : 

In[11:=Plot[L{x,x” 2}),{x,—10,10),PlotStyle— > {{GrayLevel[0. 5]) ， 
{RGBColor[0,1,1]}}] 

In[2] :~ Plot[ {x, 2x}, {x, 1,3}, PlotStyle — > {{Thickness [0. 01]}， 
{Thickness[ 0. 05 1}}] 

In[3] :=Plot[ {Sin[2x],x}, {x,—1.5,1.5},AspectRatio— ~Automatic, 
PlotStyle— >Dashing[ {0. 02,0. 02,0. 01,0. 02}]] 

重 画 和 组 合 图 形 

Show[pic]j 显示 图 形 pie 

Showf[pic ,选项 名 -> 选项 值 ] 设置 图 形 pic 的 各 种 选项 并 显示 图 形 

Show[picl,pic2,… ,picn ]】 将 图 picl,pic2,… ,picn 在 一 起 显示 

通过 使 用 Show 和 和 一 系列 不 同 的 选项 ,可 以 用 多 种 不 同方 式 察看 同一 个 
图 形 ,再 找 出 选项 的 最 佳 设置 值 , 并 可 组 合 显 示 多 个 图 形 .Show 可 再 现 各 类 作 
图 命令 完成 的 图 形 ， 

得 ”两 维 参 数 画图 函数 

ParametricPlot[ {x{t],y[t]} ttt0,tl) ;选项 ] 画 一 个 x 轴 ,y 轴 坐标 为 
{x[tj,y[Lt]}, 参 变量 t 在 [t0,t1] 中 的 参数 曲线 

ParametricPlotL{{xift ,yi[t]) ,tx2Lt,y2[ty) ,tt 下限 ,上 限 }, 选 项 ] 

画 一 组 参数 曲线 

在 Plot 中 使 用 的 选项 都 可 用 在 ParametricPlot 中 . 请 上 机 观察 下 例 . 

In[11:=ParametricPlot[ {Sin[t]1,Sin[2t]}, {t,0,2Pi}] 

In[2] := ParametricPlot[ {Cos[t],Sin(t]}, {t,0,2Pi}, AspectRatio— > 
Automatic ] | 


ee + ， 


180 Malhematica 简介 


乔 二 维 函 数 面 向 

Piot3DFf[x,y],!x.x0;,xX1}、!y.y0,y1) ,选项 ] 

在 区 域 xE Cx0,x1 和 7yETIy0,yt 上 , 夯 出 空间 曲面 fLx,y2.fLx,y] 为 实 
数值 表达 式 . 

In[12 :=Plot3D[Sin[x Cos[y]], {x,—3.3},{y,--3,3},PilotPoints 一 :> 
40]] 


《x* 图 16 一 汪 *) 


当 Plot3D 画 一 个 二 维 图 形 时 , 它 将 这 个 月 标 放 在 一 个 透明 的 长 方 体 盒子 
中 . 取 用 默认 值 Boxed -True, 显 小 这 个 盒子 的 边框 . 设置 选项 BoxRatios 能 
使 念 子 在 不 同 的 方向 压缩 或 拉 长 . ViewPoint 是 一 个 重要 的 选项 ,相当 于 如 摄 
图 形 的 照 由 机 放 在 什么 位 赞 . 不 同 的 位 署 看 到 曲面 的 形式 效果 大 不 一 样 . 

ViewPoint 的 典型 设置 如 下 : 

10. 一 2,0) | 正 前 方 {0,0.2} i 
| (0, 一 2,2) ”| 前 上 方 。 ”| (0,…2, 一 2) | 前 下 方 
| 1 -2, 一 2,0) | 会 左 角 (2, 一 2,0} ”| 盒 右 角 
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介 三 维 参 数 画 图 
ParametricPlot3D[L (x,y;,z), (uu0,41, C00)}, {vy,v0,v1, (drv)}, 选 项] 


画 三 维 参数 空间 曲 而 ,xz 一 x(u:y),y 一 y(uyv),z 一 z(u,v):uE[u0,ulj,y 
Efv0,v1] 

ParametricPlot3D[ {x,y ,zs} (0,00,01, Cdu) (vy ,v0,v1, CdvY)} ,选项 ] 

按照 函数 关系 带 出 下 维和 参数 空间 有 曲面 的 阴影 部 分 ,x 二 x(u,vY),y 二 y (uy， 
YZ=Z(u) ,SO—=s Vv) uu ulj,veELrO,v1] 

ParametricPlot3D[ {x,y;,z), {t,t0,t1) ,选项 ] 

画 三 维 参 数 空间 曲线 ,x 二 x(t),y 二 y(t) ,z= 二 z(t) ,tE Dt0,t1] 

In[1] :一 ParametricPlot3D[L{Cos[u](3 十 Cosfv]) ,Sinfu](3 十 Cos[vj)， 
Sin[y]}, {u,0,2Pi}, {vy,0,2Pi}] 

In[2] :=ParametricPlot3D[ {uyvva” 3— 3uv” 2},{u,—1.5,1.5},i{v, 
—1.5,1.5),Boxed—>~False, AspectRatio-->~1, Axes - >None, ViewPoint— > 


{1,3,1)1CxIn[1] 的 图 略 #*) 


得 ”等 值 线 图 和 密度 图 

ContourPiot[fLx,y],{x,xrmin ,xmax} ,tyyymin,ymax} ,选项 ] 

作 二 元 函数 fLx,y] 在 区 域 上 的 等 值 线 图 ,等 值 线 很 象 地 图 上 的 等 高 线 ， 
它们 把 曲面 上 高 度 相 等 的 各 点 连接 起 来 ,等 值 线 系列 对 应 于 均匀 间隔 的 z 一 
fx,y) 信 数列. 函数 ContourPlot 用 于 作 二 元 函数 的 等 值 线 图 . 

执行 ContourPlot 以 后 ,Mathematica 送 回 一 个 ContourGraphics 目标 . 
如 果 南 数值 的 网 络 不 够 细 , 等 值 线 图 可 能 会 有 误差 , 当 隙 数值 变化 幅度 较 大 
时 ,ContourPlot 能 给 出 规则 的 等 值 线 图 , 当 函 数值 变化 太 小 曲面 几乎 是 平面 
时 ,可 能 给 出 不 规则 的 等 值 线 图 . 

Densityplot[ fix,y], {x,xmin ,xmax) , {y,ymin,ymax) ,可 选项 ] 

作 二 元 函数 f[x,yJ 在 区 域 上 的 密 典 图 ,密度 图 与 等 值 线 图 的 作用 相似 . 
在 密度 图 中 ,相等 的 数值 用 同一 灰 度 表示 . 执行 DensityPlot 以 后 ,Mathemati- 
ca 送 回 一 个 DensityGraphics 目标 . 

In[1] :一 ConteurPlot[x 2/4+9y” 2 一 6, {Xx, 一 2,2},{y, 一 3,3}]C(x 请 
上 机 观看 *) 

In[2] :二 DensityPlot[ Cos[Lx JCos[Lyj, {x,—2,2},{y, 一 2,2}j(* 请 上 机 
观看 x*) 
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起 ”数据 绘图 


Mathematica 也 有 直接 调用 数据 画图 形 的 命令 ,还 可 以 使 用 Fortran 或 C 
等 其 它 语 言 生成 的 数据 做 图 . 


画图 函数 
ListPlot[{{(xl,yl1),.(x2,y2)》……) 
ListPlot[L{y1,y2,… ,yn}] 


意义 
画 出 数据 点 {x1,y1} .1x2,y2} 


“nyn}} 
ListPlet[ 数据 ,PlotJoined 一 ~True] 画 一 条 通过 数据 点 的 光滑 曲线 
{{x1,y1,zZ1}, {x2,y2,22} 和 } 三 维 数据 数据 点 {xi ,yi, zi } 时 
i= 1;2,. … "hn 


ListPlot3D[ 数 据 ] 使 用 数据 画 出 三 维 图 
ListContourPlot[ 数 据 ]] 使 用 数据 画 出 等 值 线 
ListDensityPlot[ 数据 ] 使 用 数据 画 出 密度 图 

请 上 机 观看 In[1] ,In[2],In[3j 的 输出 . 

Inf1] :=t=Table[i” (2/3), {i,1,5,0.2}];ListPlot[t] 

In[2] := ListPlot[t, PlotJoined—>~True] 

In[3] :=Table[ {Random[ ], Random[ ]}, {i,12}) };ListPlot3D[ %] 

在 graphics 程序 包 中 调 人 graphics. m ,可 作 一 些 常规 的 棒 图 和 饼 图 等 图 


In[1] :=<<"packages\graphics\graphics, m” 
In[2] :二 d 二 Table[Prime[nj,{n,10}];BarChart[d]j(* 请 上 机 观看 *》 
In[3] :一 PieChartLd ] 


址 ”用 图 形 元 素 画 图 

使 用 图 形 元 素 艇 图 适合 于 画 结构 复杂 的 图 形 . 在 Mathematica 中 也 提供 
了 各 种 二 维和 三 维 图 形 元 素 函 数 ,如 点 . 圆 弧 和 立方 体 等 . 先 用 Graphics[ 图 
形 元 素 ] 做 出 平面 图 形 表达 式 , 再 用 Show[ 图 形 表达 式 ] 的 形式 显示 完成 的 图 
形 . 前面 在 Show 中 用 过 的 选项 现在 仍然 能 用 . 
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二 维 图 形 元 素 | 几何 意义 

Point[ {x,y}) 点 的 位 置 在 {x,y) ,x 和 和 3 为 坐标 值 

Line[ {{x1,y1},{x2,y2),…)] | 依次 连接 相 邻 两 点 的 线段 

Rectangle[ {xmin ,ymin}, 以 {xmin ,ymin} 和 和 {xmax,ymax}) 为 对 

{xmax ,ymax} ] 角 线 坐标 的 填 实 矩形 

Polygon[L{xl,yl1),{x2,72) pp | 以 txlyl) ,fx2,y2),… 为 顶点 的 封 
闲 多 边 形 

Raster[ { {311,a12}, 灰 度 颜色 的 矩阵 

{821,322} ,……} ] 

Circle[ {x,y} ,r] 圆心 在 {x,y} ,半径 为 r 的 圆 

CircleL {x,y}, {rx,ry}j] 圆心 在 {x,y) ,长 短 半 轴 为 rx 和 ry 
的 椭圆 

Circle[ {x,y},r, {(t1,t2}] 从 弧度 t1 到 弧度 t2 的 圆 弧 

CircleL{x,y), {rxsrt},{t1,t2)] | 从 弧度 tl 到 弧度 t2 的 椭圆 张 


Disk[ {x,y},r] 


例如 ; 
In[1] :=Graphics[ {Line[ {{—1.5,—1.$),{1.5,1.5}}],PointSize[0. 


圆心 在 {x,y} ;半径 为 r 的 填 实 圆 


03],Point[ {0,1}],Point[ {1,0}]}] 
Out[1] 二 一 Graphics 一 (x 并 不 显示 图 形 *) 
In[2] :一 ShowL%](xShow 又 发 挥 作用 了 ,请 上 机 观看 * ) 


Point[ (x ,yz 和 


Line[L {{x1,y1,z1}, 通过 点 {xy1;21}, {x2,y2,22),…… 
{Xx2,72122},**…*}] 的 线 

Polygon[ {( {x1,y1,z1}, 具有 指定 角 的 填 实 多 边 形 
{x2,¥y2,22},-.*} | 

Cuboid[ {x0,y0,z0}, {x1l,y1,z1}] 


以 {x0,y0,z0} 和 和 {x1l,y1,zl1} 为 对 角 
线 的 立方 体 
在 {x,y,z} 处 的 文本 


| Text[ expr, {x,y ,Zz}] 
例如 
In[1] :=p=TableLPoint[ {Random[ ],Random[ ],Random[ ]}], :24}]; 
In[2] :一 ShowfGraphics3D[p]] 
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三 .初等 代数 运算 
二。 多项式 运算 
多 项 式 的 展开 


多 项 式 是 一 类 特殊 形式 的 表达 式 . 表达 式 中 的 各 种 运算 都 可 用 于 多 项 式 
的 运算 中 . 表达 式 中 的 各 种 输出 形式 也 都 可 用 于 多 项 式 的 输出 . Expand 将 多 
项 式 按 客 次 由 低 至 高 展开 成 单项 之 和 ;FactorTerms 提取 每 个 元 素 的 公 因子 ; 
Factor 做 因 式 分 解 ,将 多 项 式 写 成 尽 可 能 小 的 因 式 之 积 ;Simplify 化 简 多 项 式 
使 其 包含 的 项 数 最 少 意 义 下 的 最 简 形 式 . 


函数 意义 

Expand[expr | 按 老 次 展开 多 项 式 expr 
factor[expr] 对 多 项 式 expr 因 式 分 解 
FactorTerms| expr] 提出 多 项 式 expr 各 项 中 的 公 因 子 


Collect[ expr ,x | 


把 expr 写成 x 的 寡 次 之 和 


| Collect[expr， {x sy }] 


把 多 项 式 写 成 x,y,… 的 宪 次 之 和 


Simplify[ 多 项 式 ] 


把 多 项 式 写成 最 简 形式 


In[1] :一 p 二 Expand[ (x 十 2y 十 1)“2](x 展 开 (r 十 2y 十 1)? x*) 
Out[1]=1 十 2x 十 x: 十 4y 十 4xy 十 4y? 


In[2] :=Factor[x” 6 一 y 


6J(x 对 zx 一 y' 因 式 分 解 x ) 


Out[2] 一 (x--y)7(x 十 7)(x2 一 Xy 十 yY2》(Cx2 十 xy 十 72) 


InL3] := 二 Collext[p,yj(x 按 y 的 辕 次 排列 (之 十 27y 十 1) x》 


Out[3] 王 1 十 2x 十 x2 十 (4 十 4x)y 十 4y2 
In[4] :一 Length[Lpj(Cx 计算 多 项 式 户 的 共度 < ) 


Out[4]=6 
Inf5] :一 pL[[2Jj](*x 表达 式 p 的 第 2 项 x 
Out[5]= 2x 
有 理 多 项 式 展开 晰 数 意义 | 
ExpandNumerator[ expr |] 只 展开 有 理 式 的 分 子 
| ExpandDenominatorLexpr | 只 展开 有 理 式 的 分 母 


ExpandLexpr | 


展开 分 子 ,每 项 除 以 分 母 


| 


FactorLexpr | 


“| 完全 分 解 


Together[expr] 
Apart[expr] 


把 所 有 项 合成 在 一 个 公共 分 母 上 的 分 式 


将 表达 式 分 解 成 部 分 分 式 之 和 


Cancel[expr ] 


约 去 分 子 分 母 的 公 因 式 
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多 项 式 的 代数 运算 多 项 式 的 代数 运算 有 加 法 (十 ) ,减法 (一 ) ,乘法 (* ) 和 
除法 (/). 其 中 多 项 式 的 加 法 .减法 和 乘法 的 运算 符号 与 代数 中 运算 符号 的 相 
同 , 除 号 略 有 不 同 . 如 果 用 除 号 “/" 做 多 项 式 除法 ,最 多 约 太 明显 分 子 分 母 的 公 
因子 . 在 做 多 项 式 除 法 时 要 用 函数 PolynomialQuotient 或 PolynomialRe- 
mainder 才能 得 到 得 到 商 式 或 余 式 


多 项 式 运算 函数 意义 
PolynomialQuotientLp ,q,x] 计算 关于 x 的 多 项 式 p 和 
相 除 的 商 式 
PolynomialRemainder[p,q,x] 计算 多 项 式 p 和 8 相 除 的 
| 余 式 
PoelynomialQuotientRemainder[qg,p,x] 计算 多 项 式 p 和 8 相 除 的 
商 式 和 余 式 
PolynomialGCDL 多 项 式 1, 多项式 2,…] | 计算 多 项 式 1, 多项式 2， 
… 的 最 大 公 因 子 
PolynomialLCM[ 多 项 式 1, 多 项 式 2,…] | 计算 多 项 式 1, 多项式 2， 
… 的 最 小 公 倍 数 
Resultant[ 多 项 式 1, 多 项 式 2,x] 计数 两 多 项 式 的 结 式 
Cyclotomic [n ,x] 给 出 关于 x 的 n 阶 割 圆 多 
项 式 C, (x) 


二 方程 求 根 

解 方程 函数 Solve 的 一 般 形式 : 

Solve[ 方 程 或 方程 组 , {变量 表 列 }] 

NSolve[ 方 程 或 方程 组 , {变量 表 列 }] 

Solve 的 目标 是 找 出 方程 的 精确 解 ,Mathematica 总 可 以 解 册 四 阶 或 四 阶 
以 下 多 项 式 方程 的 精确 解 . 对 于 三 次 或 四 次 方程 ,用 Solve 算出 的 结果 可 能 相 
当 复杂 . 在 解 四 次 以 上 的 多 项 式 方程 时 ,Mathematica 碰 到 数学 理论 上 的 障碍 
而 不 能 给 出 精确 解 的 表达 式 ; 函 数 NSolve 是 找 出 方程 的 数值 解 , 因 而 总 能 解 
出 方程 或 方程 组 的 数值 解 . 

数学 中 方程 式 表 示 为 : z 一 6z 一 5 二 0. 在 Mathematica 中 等 号 (一 ) 作 
为 赋值 号 或 定义 变量 的 值 ,代数 方程 中 的 等 号 使 用 逻辑 等 号 “一 = 一” 表示, 如: 
x” 2 一 6x 一 $ 一 一 0. 这 样 ,Mathematica 中 的 方程 表示 成 一 个 逻辑 表达 式 , 它 
的 意义 是 方程 中 的 等 号 两 边 的 量 是 否 相 等 . 

In[1] :一 Solvye[Lx” S 十 9x 十 1 一 一 0,xj(Cx 找 不 到 方程 的 精确 解 x) 


ee 
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Out[1]= {ToRules[Roots[9x+x’==—1,x]]} 

In[2]:=NFo%](C* 或 用 NSolyeLx” 5 十 9x 十 1 一 一 0,x] ,直接 求 数值 解 
尖 》 

Out[2] 王 {{x 一 > 一 1.19618 一 1. 2256I} ,1x 一 > 一 1. 19618 十 1. 22561}, {x 
-- 盖 一 0. 111109)} ,{1x 一 >1.25173 一 1. 22546I} , {x~>1.25173 十 1. 22546I}} 

In[3] := Solve [{3x — 2y = = 5a,xX+y= = Shh}, {x,y} 
3z 一 2y 一 5a 

解 方程 | 十 yy 一 58 


Out[L3] 一 { 人 { 人 一 >a 十 2b:y 一 > 一 4 十 3b)} 


竹 ”和 与 积 
和 与 积 的 函数 | 数学 意义 
Sa Fv 计算 和 式 : 六 | 
Sum[ f. , {i,min,max ,di}] 以 步 长 生计 算 和 式 | 
Som[ 广 ， 二 计算 两 重 和 式 : ” SA 

| 全 一 

Product[ f, , {i,min,max}] 计算 乘积 式 , 上 
Product[ f, , {i,min,max,di}] 以 步 长 生计 算 /的 乘积 | 
Product[ f.., , {i,i0,il,s}, {i,j0,ji,js}] 计算 两 重 乘积 式 :上 [ 了 
注 :is 和 js 为 步 长 ,其 值 是 工时 可 省 略 | 


还 有 函数 NSum [fn, 循 环 范围 ] 和 NProduet[fn ,循环 范围 ], Sum 与 
NSum 的 区 别 正如 Solve 与 NSolve 的 区 别 一 样 .Sum 用 于 计算 和 式 的 精确 值 ， 
NSum 计算 和 式 的 近似 数值 ;后 理 ,可 知 Preduct 与 NProduet 的 区 别 . 


In[1] ;=Som[x ~ n/n!, {(n,0,5}] | * 计算 三 *| 


x 


x Nx 
OurL1] 一 1 十 x 十 汉 十 噩 十 歼 十 1 和 


计算 > 直 *j 


In[2] :二 Sum[1/k S 3,{k,1,10)] 


In[3] :=NSum[1/k ~ 3,{k,1,Infinity}] 
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Out[2]=1264113947 (x Sum 给 出 和 的 精确 值 *) 


16003008000 


Out[3] 一 1. 20206 

In[4] :~=NProduct[Sin[k], {k,1,5,2}] 

OQut[4]= 0.113871 

In[5] :=Product[ (a—6) (vy+6++s), {u,1,3),{v,1,3)] 
Out[5]= 一 21600(7 十 s)3(8 十 s):(9 十 s)? 
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@。 求 极限 
计算 函数 极限 limf(zx) 的 一 般 形 式 是 : 


Limit[expr ,x 一 >x0] 工 一 zo 时 郊 数 expr 的 极限 
Limit[expr ,x—>x0, Direction—>>1] QZ 一 时 卫 数 expr 的 极限 
Limit[expr,x 一 >x0,Direction 一 > 一 1]】 过 一 rt 时 函数 expr 的 极限 
In[1] :一 LimitECx ”2 一 1)/(4x ”2 一 7x 十 1) ,x 一 >Infinity](#* 计算 


x ) 


In[2] :一 LimitLSin[1/x],x 一 >0] 
Out[2] 一 RealJnterval[L{ 一 1,1)]Cx* 在 (一 1:;1) 之 间 振 荡 x》 
In[3] :=Limit[1/x,x—>0,Direction—>—1]( * 计算 Lim Ix ) 


工 一 自 


Out[3] 王 Infinity 


乔 微 商 和 微分 
在 Mathematica 中 能 方便 地 计算 任何 函数 表达 式 的 任意 阶 微 商 (导数 ). 


如 果 了 是 一 元 函数 ,D[f,x] 表 示 SS) ,如 果 了 是 多 元 函数 ,D[f,z] 表 示 


六 下 . 微 商 函数 的 常用 形式 如 下 : 


D[f,x] 计算 偏 导数 二 
Dff,xl,x2,…'] 计算 多 重 导 数 20 下 7 


me en oo 
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即 


D[f, fx,n)] 计算 x 阶 导数 之:f 


DIf,x,NonConstants—> {v1l,y2,-…}] 计算 之 f， 其 中 vi,v2,… 依 赖 于 


In[1] :一 D[x” x,xjCx* 计算 xz 的 一 阶 导 数 x*) 
Out[L1] 一 xx 十 xiLog[x] 


In[2] :=D[z SinLx” 2y” 2],x,y]( * 计算 
Out[2]=4x y zCos[x’y’]— 4x’ ysSin[xz y?] 
下 面 列 出 全 微分 函数 Dt 的 常用 形式 及 其 意义 : 
Dt[f] 全 微分 df 


Dt[f,x] 全 导数 入 
df df .yp 


Dt[f,x1,x2,…] 多重 全 导数 3 


Dt Lf, x, Constants - > {cl, c2,…}] 全 导数 , 说 明 ci 为 常数 
dkci) _ 
dz 
y/ :DtLy, xz 一 0 置 科 一 0 

In[3] ,一 Dt[x” 2 十 y” 2] 

Out[3]=2x DtLx] 十 2y Dt[y] 

In[4] :一 DtLx” 2 十 y” 2,x] | * 计算 全 导数 所 (za 二 y) x* 
Out[4]=2x+2y Dt[y,x] 


9 
drgy 


zsin(x:y:) x ) 


0 


得 不 定 积分 和 定 积分 
不 定 积 分 
Integreate 函数 主要 计算 只 含有 “简单 孙 数 ”的 被 积 函 数 .“ 简 单 函 数 ” 包 


括 有 理 函 数 、 指 数 函 数 、 对 数 沙 数 和 三 角 与 反 三 角 函数 . 不 定 积分 一 般 形式 如 


下 : 


Integratelf ,x] 计算 不 定 积分 f(z)dzx 
Integrate[f ,x,y] 计算 不 定 积分 [dz f(x,y)dy 
iIntegrate[f,xwy,z] 计算 不 定 积分 jdz [dy|f (zsy,2)ds 


dxr* 》 


In[L1] :=Integrate[1/(x” 2—1),x|( * 计算 | 
Out[1]— Host}—*] — Logl}+x] 


Xx:—1 
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In[2] :二 Integrate[3x ”2 十 y,x,y]( * 计算 | x 十 ydrdy* ) 

Out[2] 一 3xs 十 2yY? 

Mathematica 除了 能 计算 简单 积分 外 ,还 能 计算 一 类 如 贝 塞 尔 (BesselJ 
[n,z)、 伽 马 (Gamimafz]) 等 二 三 十 个 数学 物理 特殊 函数 . 这 些 特殊 阻 数 在 很 
多 应 用 范围 内 扩充 了 Mathematica 的 积分 功能 . 

例如 :Gamma[z] 函 数 定义 的 积分 5(z) = +7!e-dt 


Beta[a,b] 函 数 定义 的 积分 B(asb) = 多 一 | 一 机 


还 可 以 通过 定义 函数 或 程序 包 来 增强 Mathematica 积分 的 功能 . 

定 积分 

计算 定 积分 的 命令 和 计算 不 定 积分 是 同一 个 Integrate 函数 ,在 计算 定 积 
分 时 ,除了 要 给 出 变量 外 还 要 给 出 积分 的 上 下 限 . 当 定 积分 算 不 出 准确 结果 
时 ,用 N[L%%] 命 令 总 能 得 到 其 数值 解 . NIntegrate 也 是 计算 定 积 分 的 函数 ,其 
使 用 方法 和 形式 和 lntegrate 函数 相同 . 用 Integrate 函数 计算 定 积分 得 到 的 
是 准确 解 ,NIntegrate 函数 计算 定 积分 得 到 的 是 近似 数值 解 . 计算 多 重 积 分 
时 ,第 一 个 自 变量 相应 于 最 外 层 积分 放 在 最 后 计算 . 

Integrate[f, {x,a,b}] 计算 定 积分 | Fez)dz 


NIntegrate[f, {x,a,b}] 计算 定 积分 | f(x)dz 
Integrate[f, {x,a.b},{y,c,d}] 计算 定 积分 | dz| rz,y)dy 


NIntegrate[f, {x,a,b},{y,c,;d}] 计算 定 积分 | dz| f(z ,ydy 
In[1] := Integrate[Cos[x] ”2 十 SinEx]` 3,{x,0,1}] ( x* 计算 
| cosz 十 sin2r)dqz x ) 


In[2] :二 NIntegrate[Cos[x] ~ 2 十 Sinftx]” 3,{x,0,1}] 
Out[2]==0, 906265( x 用 Nintegrate 计算 定 积分 的 数值 解 * 》 
In [3] :=Integrate[x+y, {x,b,a}, {y,0,x} |]( * 计 并 | | 十 y)dydz 
x*) 
b’ 


a3 
Out[3] 一 斑 一 六 


和 短 级 数 
办 级 数 展开 函数 Series 的 一 般 形式 : 


Se aptortp- -~ 
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Series[expr, {x,x0,n}] 将 expr 在 x 一 x0 点 展开 到 n 阶 的 宕 级 数 

Series[expr, {x,x0;,n),{y,y0,m}] 先 对 y 展开 到 m 阶 再 对 x 展开 n 阶 
寡 级 数 

用 Series 展开 后 ,展开 项 中 含有 截断 误差 相 OLx] 了 ,请 看 下 面 实例 : 

In[11:=Series[Sin[2x], {x,0,6}] 

Out[1]=2x 一 等 + 狂 二 Ofx 了 
In[21:=Series[f[x], {x,.0.3}] 
Out[2]=f[0] +f [ox Oe + To Orxy 
In[3] :=Series[LExp[x]” 1/2, {x,—1,3}] 
Om[3]= 志 十 二 证 + 导 妇 +O0[1 x 

In[4] :=Series[Cos[x]Cos[y]; {x,0,3}, {y;0,3}] 

Out[ 人 一 1 一 吃 十 O[y] 上 (一 至 十 下 二 O[y]ox 二 DO[x， 

Series 在 处 理 多 元 函数 靠 级 数 时 , 同 Integrate 和 Sum 等 一 样 ,从 最 后 一 
个 变量 到 第 一 个 变量 逐个 展开 . 


禾 常 微分 方程 

求解 常 微分 方程 和 常 微分 方程 组 的 函数 的 一 般 形式 如 下 : 

DSolveLeqns,y[xj,x] 和 解 y(x) 的 微分 方程 或 方程 组 eqns ,x 为 变量 

DSolveLeqns,y,x] 在 纯 函 数 的 形式 下 求解 

NDSolive [eqns,y[Lxj, {x,xmin,xmax}] 在 区 间 {xmin,xmax} 上 求解 变 
量 是 x 的 常 微分 方程 或 联 立 常 微分 方程 组 eqns 的 数值 解 

In[1] := 二 DSolve[y'[xj 二 二 a y[xj,y[xj,x](* 解 微分 方程 y' (Xx) 一 
ay(z) *) 

Out[1]= {{y[x]->E*C[L1]}} 

In[2] :二 DSolvef ty' [x] 一 二 a y[xj,;y[0] 二 二 1},y[xj,x](* 解 微 分 方程 
Y'(X) 二 ay(z), 边界 条 件 : y(0) 二 1 x*) 

lt) = y(7) 
Out[2]=={{y[xj] 一 >E*})}( x 解 常 答 分 方程 组 St x 


In[3] :=DSolve[ {x'[t]= =yft],y [t= =x[t])}, {x[Ct],yLt]} ,4] 
Out[3]=—{ (x[t] >HI+ECL CL21+E [2 


y[O_> 二 CH 十 EC C[2] 十 EC[2] )} 
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五 .线性 代数 


得 ”定义 向 量 和 和 矩阵 函数 

定义 一 个 扎 阵 ,可 用 函数 Table 或 Array. 当 和 矩 阵 元 素 能 用 .个 函数 表达 
式 表示 时 ,用 函数 Table 在 定义 矩阵 大 小 的 同时 也 给 每 个 矩阵 元 素 定义 了 确 
定 的 值 . 用 函数 Range 只 能 定义 元 素 为 数值 的 向 量 .Array 只 能 用 于 定义 向 
量 , 和 矩阵 和 张 量 , 并 规定 害 阵 和 张 量 的 元 素 下 标 从 1 开始 . Array 的 一 般 形式 

Array[ 向 量 元 素 名 ,nf 

定义 下 标 从 f 开始 的 有 n 个 元 素 的 向 量 , 当 f 是 1 时 可 和 省略 . 

Array[ 和 矩 阵 元 素 名 , {m,n}] 

定义 m 行 n 列 的 矩阵 . 其 中 :矩阵 元 素 名 是 一 个 标识 符 , 表 示 和 矩阵 元 素 的 
名 称 , 当 循环 范围 是 fu,Y,w}) 时 定义 一 个 张 量 . 

Table[ 表达 式 f, 循 环 范围 ] 

表达 式 f 表示 向 量 或 矩阵 元 素 的 通 项 公式 ;循环 范围 定义 矩阵 的 大 小 . 

循环 范围 的 一 般 形式 : {循环 变量 名 ,循环 初 值 ,循环 终 值 ,循环 步 长 }. 

在 Array 或 Table 的 循环 范围 表示 方法 略 有 区 别 . 请 在 下 面 的 实例 中 注 
意 观 察 . 

In[1] := Table[afi,jj, {i,2}, {j,2}] 

Out[1j 二 {{a[l,1],afl,2]},{a[2,1],a[2,2])}(x 矩阵 每 一 行 元 素 用 一 
对 人 } 括 起 来 x 》 

In[2] :=U=Array[a, {2,2}] 

Out[2]={{a[l;1j],a[l,2]), {a[2,1],aL2,2])} 

In[3] :==1dentityMatrix[53]( x IdentityMatrix[nj] 生 成 n 维 单位 炬 阵 *) 

Out[3]={{1,0,0,),{0,1,1},{0,0,1}} 

In[4] :一 DiagonalMatrix[{1,2,3}](* 生 成 对 角 线 元 素 为 表 元 素 的 对 角 
短 阵 * ) 

Out[4]={{1,0,0},10,2,0}),{0,0,3})} 

In[51:=TableForm[ %] 

(xTableForm[m] 或 MatrixForm[Lm] 按 矩阵 形式 输出 m ,Dut[L6j] 输 出 略 
尖 ) 

一 个 矩阵 可 用 一 个 变量 表示 ,如 InL2] 所 示 U 是 一 个 矩阵 , 则 ULLiJJ 表 示 
U 的 第 i 行 的 n 个 元 素 ;Transpose[UJ]L[jjJ 表 示 U 的 第 j 竺 的 m 个 元 素 ;U 
[[i, 让 或 a[i,j] 表 示 VU 的 第 i 行 第 j 列 元 素 ;U[[{il,i2,*… ,ip}, (jl;j2,*…， 
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jq}j]] 表 示 由 行为 {i1, 设 ,… ,ip} 和 列 为 {j1,j2,…,jq} 组 成 的 子 和 矩阵 . 


者 ”和 矩阵 的 运算 符号 和 活 数 
| 表达 式 意义 
| A+e A 为 矩阵 ,ce 为 标量 ,c 与 A 中 的 每 个 元 素 相 加 
AA,B 为 同 阶 身 莉 或 矩阵 ,A 与 了 的 对 应 元 素 相 加 
A 为 矩阵 ,e 为 标量 ,e 与 & 中 的 每 个 元 素 相 乘 
U.v 向 量 U 与 V 的 内 积 
A.B 矩阵 A 与 矩阵 B 相 乘 ,要 求 A 的 列 数 等 子 B 的 行 数 
DetLM I] 计算 矩阵 M 行列 式 的 值 
Transepose[M ] |M 的 转 置 矩阵 CM 或 M') 
Inverse[M] 计算 矩阵 M 的 道 矩 阵 (M-':) 
Eigenvalues[ A] 计算 矩阵 A 的 全 部 (准确 解 ) 特 征 值 
Eigenvalues[N[A]] | 计算 矩阵 A 的 全 部 (数值 解 ) 特 征 值 | 
Eigenvectors[ A | 计算 矩阵 A 的 全 部 (准确 解 ) 特 征 向 量 
Eigenvectors[N[AJ] | 计算 矩阵 A 的 全 部 (数值 解 ) 特 征 向 量 
Eigensystem[LA] 计算 矩阵 A 的 所 有 (准确 解 ) 的 特征 值 和 特征 向 量 
Eigensystem[NLA]] | 计算 矩阵 A 的 所 有 (数值 解 ?的 特征 值 和 特征 向 量 


和 方程 组 求解 函数 

在 Mathematica 中 用 LinearSolve[LA,B] ,求解 满足 方程 组 4 下 二 8B 的 一 
个 解 . 如 果 4 的 行列 式 不 为 零 ,那么 这 个 解 是 方程 组 的 唯一 解 ;如 果 4 的 行列 
式 是 零 ,那么 这 个 解 是 方程 组 的 一 个 特 解 , 方 程 组 的 全 部 解 由 基础 解 系 向 量 的 
线性 组 合 加 上 这 个 特 解 组 成 . 

NullSpace [A ] 计 算 方程 组 4 无 一 0 的 基础 解 系 的 向 量 表 ,用 LinearSolve 
[A,B] 和 NullSpace[LA] 联 手 解 出 方程 组 4 下 一 下 的 全 部 解 ， 

Mathematica 中 还 有 一 个 美妙 的 函数 玉 owReduce[A], 它 对 4 的 行 庙 基 
作 化 简 成 梯形 的 初等 线性 变换 . 用 RowReduce 可 计算 矩阵 的 秩 , 判 断 血 量 组 
是 线性 相关 还 是 线性 无 关 和 计算 极 大 线性 无 关 组 等 工作 . 


| 解 方程 组 函数 。” ”| 意义 | 
| RowReduce[A] ”| 作 行 的 线性 组 合 化 简 A,4 为 m 行 n 列 的 矩阵 


LinearSolve[A,B] | 求解 满足 方程 组 4X = 8 的 一 个 解 ,， 4 为 方 阵 
NullSpaceLA] 求解 方程 组 A 二 0 的 基础 解 系 的 向 量 表 ,4 为 方 阵 
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{1 1 1 工 
例 :已 知 4 一 |。 | | 。| 计算 4 的 秩 , 计 算 4X = 0 的 基础 解 系 
3 2 1 3 


In[L1] :=A={{1,1 1 TI {1,0,—1,1},{3,1,—1,3),{3,2,1,3)}; 

InL2] :=RowReduce[A |] 

Out[2] 二 4{1,0, 一 1,1}, {0,1,2,0}, {0,0,0,0}),10,0,0,0}}(# 显然 ,4 
的 秩 是 2%》 

In[3] :==NuliSpace[A] 

Out[3j 二 {{ 一 1,0,0,1),{1, 一 2,1,0}}(x 妥 的 两 个 线性 无 关 解 x) 
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大 插值 多 项 式 

Interpolation 插值 遇 数 的 一 般 形 式 : 

Interpolation[L data, InterpolationQrder— >n ] 

对 数据 data 进行 插值 运算 ,并 可 设置 插值 多 项 式 的 次 数 n, 默 认 值 为 3， 
Interpolation 生成 一 个 InterpolatingFunction[ 插 值 范围 ,二 汗 ] 自 标 ( 如 Out 
[2]) ,系统 不 显示 所 构造 的 插值 函数 . 因此 ,用 户 直 接 用 生成 的 插值 函数 计算 
函数 的 近似 值 . 例如 : 

In[1] :=data=Table[L{{1,16}), {2,12},{4,8},{5,9}}]; 

In[2] :二 g=Interpolation[data ,interpolationOrder— >3] 

Out[2]=InterpolatingFunction[ {1,5) ,<<»>] 

In[3] :二 g[1.2jC(x* 计 算 x 二 1.2 处 函数 的 近似 值 *) 

Out[3]=15. 1307 

gra tL dd {fy0,dy0)}, {x1, {yl, 
dy1}},…}) 形 式 存放 数据 . 

例 :已 知 插值 条 件 ,7(0) 一 0,f(D 一 2, 对 | 一 1, 疆 | =1, 求 三 次 
插值 多 项 式 . 

In[4] :=d={{0,0,1},{1,2,1}};h=Interpolating[d,x] 

Out[4]=InterpolatingFunction[ {0,1} ,< >>] 

In[5] :==h[L0. 2] 

Out[5}]=0. 336 
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便 ”曲线 拟 合 

拟 合 函数 Fit 的 一 般 形 式 ， 

Fit[ 数 据 , 拟 售 函 数 的 基 ,变量 ] 

FitLdata ,fun ,vars] 用 数据 data ,以 vars 为 变量 , 按 函 数 fun 的 形式 构造 
拟 合 函数 . 

例如 : 设 某 次 实验 数据 如 下 : 


县 1.36 1.49 1.73 1.81 1.95 2.16 


y 14.09 15.09 16.84 17.38 18. 44 19. 95 
试 按 最 小 二 乘法 用 一 次 多 项 式 、 二 次 多 项 式 拟 全 以 上 数据 . 
In[1j :=f= {{1. 36;,14. 09) ,11. 49，15. 09}, {1. 73, 16. 84) ,11. 81， 
17.38},11.95,18.44},12.16,19. 95}} ;FitLf {1,x),x] 
Out[1] 一 4.17841 十 7. 30662 x 
In[2] :一 Fitff ,1(1,x,x” 2},x)] 
Out[2] 一 3.?8051 十 7.7?7224 x 一 0.133012 x’ 


全 方程 求 根 
Solve 和 FindRoot 都 能 求 方程 的 根 ,Solve 主要 用 于 多 项 式 方程 组 的 求 


根 ,FindRoot 计算 非 线 性 方程 或 方程 组 的 一 个 数值 解 . 下 列 FindReoot 的 求解 
形式 及 其 意义 ， 


| 函数 FindRoot | 意义 | 
| FindRoot[ 方 程 , {x,x0)] | 从 x 二 x0 开始 ,计算 方程 的 一 个 数值 解 


FindRoot[ 方 程 ,{x,{x0,x1))] | 以 x0 和 x1 为 初始 值 ,计算 方程 的 一 个 数值 
| 解 . 当 找 不 出 f 的 显 式 的 导数 表示 时 使 用 . 
FindRoot[L 方 程 ,(x,xstart， 在 xmin ,xmax 范围 内 计算 方程 的 一 个 
xmin ,xmax}] | 数值 解 

FindRoot[ {方程 组 ) , {x,x0}， | 计算 联 立方 程 组 的 数值 解 . 
{yy0},n"] | 


者 ”数值 积分 
函数 Integrate 和 NIntegrate ,表面 上 看 起 来 象 一 对 蚌 数 . 前 者 是 计算 积 


分 的 准确 解 , 即 符号 计算 ;后 者 是 计算 积分 的 近似 值 , 即 数值 计算 . 对 于 被 积 函 
数 的 奇 点 ,可 在 积分 区 域 上 列 出 . 
In [1] : = NIntegrate [1/Sqrt [Abs Cxjj, {x,— 1,1)](* 计算 


. 1 
一 二 dz,0 是 奇 点 x* ) 
| dz 0 是 村 
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Out[1]=4 

例如 :计算 复 平面 上 的 线 积分 ,积分 曲线 从 一 1 起 到 一 i,1,i 再 回 到 1 的 闭 
曲线 . 

In[2] :=NIntegrate[ 1/x, {x,—1,—i,1,i,—1}] 

Out[2] 二 1. 11022 10-' 十 6. 28319 IC(* 由 高 斯 公式 准确 解 是 2xi *》 


者 ”计算 极 小 值 的 函数 


函数 | 意义 
“| FindMinimum[f, {x ,x0}] 氛 初始 点 为 x 一 x0 计算 ff 的 
一 个 局 部 极 小 值 点 
FindMinimum[f, {x, (x0,x1)}] 以 x0,xl 为 初始 值 计 算 f 极 小 值 ， 


当 找 不 出 f 的 显 式 导数 表示 时 使 用 . 
以 x 一 xs 为 初始 值 ,在 [x0,x1j 
区 间 计 算 f 的 极 小 值 . 

计算 多 变量 函数 的 极 小 值 ， 

初 值 为 {x0,Y0,…} 

例 :InL3j] :=FindMinimum[x” 4 二 3x”2y 十 x y, {x,0.1},{y,0.2)j 
OutL3] 一 { 一 0.832579，{x 一 > 一 0.886325,y 一 > 一 0. 335672}} 

在 x 二 一 0. 886325,y 一 一 0. 335672 处 ,f(x,y) 的 极 小 值 为 一 0. 832579. 


FindMinimum[f, {x, {xs,x0,x1)}] 


FindMinimum[f, {x,x0), {y,y0),..] 


得 傅立叶 (Fourier) 变 换 
Mathematica 可 在 复数 域内 进行 Fourier 变换 和 反 Fourier 变换 . 对 于 长 


度 为 n 的 表 , 表 的 元 素 a; 的 Fourier 变换 5, 定义 为 Dy eh, 注 


意 零 频率 项 在 位 置 1. Fourier 变换 将 数据 的 时 间 施 列 变 成 数据 的 频率 分 量 . 
用 Feourier 道 变 换 林 以 重新 得 到 时 间 序 列 .长 度 为 n 表 的 元 素 为 &, 的 Fourier 


1 . —2nitr— 1) Cs—1) in 
道 变换 a. 为 二 二 2 be 
不 论 数 据 表 的 长 度 是否 为 2 的 季 短 ,Fourier 变换 都 给 出 计算 结果 ， 
常用 的 健 立 叶 变 换 的 形式 有 ， 
Fourier[{a0.al1,… ,an}] 
InverseFourier[ {b0,b1,.… ,bn}] 
Fourier[ { {a00,201,.…}, {al0,all,.}-.}}] 


Fourier 变换 
反 Fourier 变换 
二 维 变换 
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例如 ; 

In[1]:={—1,—1,—1,—1;,1s1,1.1) ;ft=Fourier[ % ] 

(x 对 一 组 方形 脉冲 做 Fourier 变 撞 x* ) 

Out[1]={0. ,一 0.707107 一 1. 70711 I,0. ,一 0.707107 一 0. 292893 T， 

0. ,一 0. 707107 十 0. 292893 1,0. ,一 0. 707107 十 1. 7071] I} 

In[21:—InverseFourier[ % ] 

Out[2]={—1.;—1,,—1.+2.7477 10-4T 一 1.， 1.，1. ,1. 一 2.7477 
10- 1,1.} 

In[L3] :=Chop[ %] 

Out[3] 一 (一 1 ,一 1, 一 1, 一 1,1,1,1,1)(* 恢 复 了 原 数 据 * ) 


短 常 微分 方程 数值 解 

NDSolve[ {eqnli,eqn2,.…},y, (xxmin,xmax}] 对 常 微分 方程 eqn1, 求 
函数 y 关于 x 在 [xmin,xmax] 范 国内 的 数值 解 . 

NDSolvef (egqal,eqn2,…} ,1y172……)} ,1xxmin,xmax}] 对 常 微分 方 
程 组 , 求 函 数 y1,y2,… 关 于 x 在 [xmin,xmaxj 范 围 内 的 数值 解 . 

方程 或 方程 组 的 初始 条 件 也 必须 作为 方程 列 出 ,并 和 方程 放 在 一 起 . 要 解 
n 阶 的 党 微分 方程 ,必须 同时 给 出 n 一 1 个 导数 的 初始 秆 . NDSolve 以 Interpo- 
latingFunction 目标 生成 函数 3 的 解 ,并 由 此 得 到 [xmin ,xmax]j] 上 的 任何 一 点 
x 的 y(x) 的 近似 和 值 . 

T(t) = y(t) — rt) 
例 : 求 解 常 微分 方程 组 |， (12) 一 2zrG0) — y(t) EL0,1], 
zf0》 一 >(0) 一 1 
计算 xz(1.2),y(1. 2) 的 值 . 
In[1]:=NDSolve[ {x' [tj]==—y[t]—x[t]” 2,y [tl==2 x[ti—y[tj, 
x[0]==y[0]== 二 1}, {x,y},{t,0,3}] 
Out[11= {{x—>InterpolatingFunction[ {0., ,3, }, <>]}， 
{y—>InterpolatingFunction[ 10. ,3. } ;<>]}} 

In[2] := {p=x/. First[ % 1],q=y/. Last[L 1} 

Out[2]= {InterpolatingFunction[ {0. ,3. } ,< >],InterpolatingFunction 
[{0. ,3. } .< 全 

Inf3] :={p[1. 21,9[1.2]}(*# 计算 {zx(1.2),y(1.2)} x) 

OutT3]={—0.301149,0. 432898} 
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各 ”线性 规划 

ConstrainedMax[ 自 标 函 数 , {限定 区 域 ), {变量 }] 

ConstrainedMin[ 日 标 葡 数 , {限定 区 域 }, {变量 }] 在 限定 区 域内 求 线性 
目标 函数 的 极 大 或 极 小 值 . 

LinearProgranmming[e,A:b] 计算 min 二 cX,s.t，AX 汪 5b, 久 之 0, 其 
中 ye 一 《eco 一 (xy te) 

例如 ;计算 函数 (rz,y) 二 37 十 2y 一 1, 在 限定 区 域 :x+ 之 1,3 疡 2 上 的 
最 大 值 和 最 小 值 . 

In[1] :—ConstrainedMax[3x+27—1,{x<<1,y<2}), {x,y}] 

Out[1] 二 {6, {x 一 >1yy 一 >2}})(#* 在 点 全 ,2)} 上 达 最 大 值 f(1,2)= 一 6x) 

In[2] :=ConstrainedMin[ 3x+2y—1, {x<1,y<2}, {x,y}] 

Out[L2] 二 {(1,{x 一 >0,y 一 >0}}(x 在 点 {0,0} 上 达 最 小 值 f(0,0) 二 一 1 
x*) 
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得 ”过程 的 基本 构成 

简单 地 说 ,在 Mathematica 中 的 一 个 过 程 是 用 分 号 隔 开 的 表达 式 序列 ,一 
个 表达 式 序列 也 称 为 一 个 复合 表达 式 . 在 Mathematica 的 定义 中 ,任何 一 个 表 
达 式 的 位 置 都 能 放 一 个 复合 表达 式 . 运行 时 过 程 中 的 表达 式 依次 求 值 . 编程 中 
或 许 更 习惯 说 是 语句 序列 ,在 一 个 输入 行 中 就 可 以 放 一 个 过 程 , 调 用 一 个 过 程 
就 象 调 用 一 个 函数 . 

在 过 程 中 ,经常 需 要 用 工作 变量 保存 计算 的 中 间 结 果 , 称 这 类 变量 为 局 部 
变量 . 局 部 变量 可 以 在 过 程 中 得 到 任何 想 要 的 值 ,而 不 会 影响 过 程 外 部 的 值 . 
如 果 要 用 局 部 变量 与 表达 式 序列 组 成 一 个 程序 块 ,可 用 Module 模块 结构 . 

Module[ {局 部 变量 表 } ,表达 式 ] 

{局 部 变量 表 } 中 可 说 明 0 个 或 多 个 局 部 变量 ,说 明 变量 时 只 列 出 变量 名 ， 
不 需 对 变量 进行 类 型 说 明 ,. 局 部 变量 名 之 间 用 逗号 分 隔 , 并 可 在 说 明 时 赋 以 初 
始 值 , 当 表 达 式 为 复合 表达 式 时 ,表达 式 之 间 用 分 号 相隔 ,并 以 最 后 一 个 表达 
式 的 值 作为 Medule 结构 的 值 . 

一 个 程序 可 作为 一 个 输入 行 ,也 可 保存 在 一 个 文件 中 ,在 输入 行 中 用 
“<<" 调 人 文件 ,就 象 调 人 系统 程序 包 中 的 程序 一 样 . 在 系统 程序 包 Pack- 
ages 中 放 着 一 些 子 程序 包 , 每 个 子 程序 包 中 都 有 若干 函数 ,图 16 一 6 中 列 出 
Packages 的 子 包 Graphics 的 程序 . 
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图 16 一 6 ”Packages 和 Graphics 的 内 容 


例 : 调 出 样 条 插值 函数 对 数据 p 作 样 条 插值 ,并 计算 s(3. 7) 
In[1] :=<=<NumericaMath'SplineFit' 

In[2] :=p={({0,0},{(1,2},{3,—1),{1,3}{4,2}}; 

In[3] ;=s=SplineFit[p,Cubic] 
Out[3] 一 SplineFunctionLCubic,{0. ,3. } ,<>] 

In[4] :=s[3.7] 

Out[4]= {2. 6515,2. 8265} 


二 条件 控制 结构 

肥 辑 表达 式 和 逻辑 运算 符 

关系 表达 式 是 最 简单 的 逻辑 表达 式 , 用 关系 表达 式 表 示 一 个 判别 条 件 . 例 
如 :TIT >3. 

关系 表达 式 的 一 般 形 式 : 忆 表达 式 > 去 关系 运算 符 之 到 表达 式 二 
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关系 运算 符 三 二 ! = > 
数学 意义 一 等 于 “天 不 等 于 > 六 扫 

逻辑 表达 式 的 一 般 形 式 ;二 关系 表达 式 沁 之 仙 辑 运算 符 汪 二 关系 表达 式 之 

逻辑 运算 符 有 :! (逻辑 非 ),&&.( 逻 辑 与 .and), | ( 返 辑 或 .or). 

通常 ,我 们 已 经 习惯 地 认为 逻辑 表达 式 的 值 非 真 即 假 . 在 Mathematica 
中 ,人 逻 辑 表 达 式 的 值 有 三 个 : 真 , 假 和 非 真 非 假 . 当 判 定 条 件 成 立时 ,逻辑 表达 
式 的 值 为 True( 真 ); 当 判定 条 件 不 成 立时 ,有 逻辑 表达 式 的 值 为 False; 当 判定 
条 件 无 法 判断 时 ,逻辑 表达 式 的 值 非 真 非 假 . 非 真 非 假 逻辑 值 的 是 什么 值 ? 它 
仍然 是 一 个 逻辑 表达 式 . 例如 : 

Inf1] :=x=3;x>y 

Out[f2] 二 x>>y(*x 因为 没有 给 y 赋值 ,Mathematica 也 就 无 法 判断 x 是 否 
大 于 yx*) 

In[3j :=x>0 

OutL3j 一 True 

InL4] :一 x 盖 10 

Out[L4] 一 False 

If 语句 结构 

于 语句 的 结构 与 一 般 程序 设 计 语 言 结构 类 似 . 由 于 Mathematica 的 脖 辑 
表达 式 的 值 有 三 个 ; 真 (CTrue)、 假 (False) 和 * 非 真 非 假 ” 因 此 ,条 件 语句 的 转 
向 也 有 三 种 情况 .下 列 If 结构 的 三 种 情况 . 

If[ 逻 辑 表达 式 ,表达 式 1 ,表达 式 2, 表 达 式 3] 

当 导 辑 表达 式 的 值 是 True 时 ,转向 计算 表达 式 1, 当 逻辑 表达 式 的 值 是 
False 时 转向 计算 表达 式 2, 当 你 辑 表 达 式 的 值 非 True 非 False 时 (无 法 判定 
时 ) ,计算 表达 式 3, 并 将 所 计算 表达 式 的 值 作为 整个 If 结构 的 值 . 其 简单 的 形 
式 是 ; 

下 [你 辑 表达 式 ,表达 式 1 ,表达 式 2] 

If[ 多 辑 表达 式 ,表达 式 1] 

In[1] :=g[y_]:=If[y>0,"ABC” "DEF" ,"XYZ’”] 

inL2] := {g[7],gf—1j,g[z]} 

Out[2]={ABC,DEF,XYZ}(*z 没 有 吴 值 ,还 辑 表达 式 2S>0 的 值 非 
True 非 False * ) 

Which 语句 结构 

Which 语句 的 一 般 形式 : 

Which[ 条 件 1, 表 达 式 1, 条 件 2, 表 达 式 2,…, 条 件 n, 表 达 式 nj 

Which[ 条 件 1, 表 达 式 1,… ,条 件 za 表达 式 n,True ,表达 式 ] 


信人 人 
入 
Il 


ee ，- conercrr vv- 
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依次 计算 条 件 i, 计 算 对 应 第 一 个 条 件 为 True 的 表达 式 的 值 ,作为 整个 
结构 的 值 . 如 果 所 有 条 件 的 值 都 为 False, 则 整个 结构 的 值 是 Null, 用 True 作 
为 Which 的 最 后 一 个 条 件 时 ,可 用 于 处 理 其 它 情 况 ,相当 于 C 语言 中 Switch 
语句 中 的 default 的 作用 . 

例如 :计算 

sin(r)0<T< 8 
TA2,16 委 工 所 20 
0, 其 他 

In[3] :=h[x ] :=Which[x<0,—x,x> =08x<6,Sin[x],x > = 
16&&x<<20,x/2,True,0] 

InL4] := {hL5],h[16. 21,h[z]} 

Out[4] 二 {Sin[5],8.1,0}( x*z 未 同 值 ,不 满足 前 三 个 条 件 *) 

In[5] :=k[x ] :=Which[x>1,0=1,x>2,v—=2,X>3,w=3] 

In[6] :=k[6] 

Out[6] 王 1(* 同时 满足 三 个 条 件 , 执 行 第 一 个 条 件 对 应 的 表达 式 x 》 

Switch 语句 的 一 般 形式 : 

Switch[expr ,模式 1, 表 达 式 1 ,模式 2 ,表达 式 2,、…] 

将 表达 式 expr 的 值 与 模式 1 ,模式 2,… ,依次 做 比较 ,给 出 第 一 个 与 expr 
匹配 的 模式 i 对 应 的 表达 式 i 的 值 . 若 没有 匹配 的 模式 , 则 整个 结构 的 值 为 
Null. 

In[7] :=g{[x_] :=Switch[Mod[x,3],0,a,1,b,2,c] 

In[8] :={g[7],g[8],gL91,gLzj} 

Out[8]= {b,c,a, Nuoll} 


得 ”循环 控制 结构 

Mathematica 中 共有 三 种 描述 循环 的 语句 ,它们 是 Do、While 和 For. Do 
循环 类 似 于 Fortran 中 的 Do 语句 , 它 根据 循环 描述 先 计 算 循 环 次 数 ,再 做 循 
环 体 , 常 用 于 有 确定 循环 次 数 的 循环 结构 . 在 While 和 For 中 ,做 一 次 条 件 确 
认 后 ,做 一 次 循环 体 的 表达 式 . 类 似 于 C 语言 中 的 While 和 For 语句 . 

po 语句 的 一 般 形式 为 :Do[ 循 环 体 , {循环 范围 }] 

Do 语句 有 下 列 形 式 ， 

Do[expr,fi',io,il,s)] 循环 变量 i 从 齐 到 让 ,每 次 i 增加 s, 计 算 表 达 式 
expr. 


Do[expr, {i,il}] 同上 , 当 循环 初 值 i0 二 1, 步 长 5 二 1 时 可 省 赂 不 写 
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Dofexpr, {n}] 对 表达 式 expr 计算 na 次 

Do[expr. {i,i0,il,is} ,1j,j0,j1l,js}] 从 齐 到 il, 每 次 i 增加 s, 对 每 个 
ij 从 j0 到 j1C 步 长 认 ) 做 表达 式 expr 

In[1] :=t=x;Do[t=1/(14+kt), {k.,2,6,2} |];t 

Out[1]= 1 


De 
1 十 二 


1 十 2x 
In{2] :一 DoLPrintEti ”3 1 ixOurL2 略 关 ) 
While( 当 型 ) 语 句 的 一 般 形式 : 
While[ 条件, 循环 体 ] 
当 条 件 为 True 时 则 对 循环 体 表达 式 求 值 ,重复 对 条 件 判 断 和 对 循环 体 
求 值 过 程 直 到 条 件 非 真 ( 非 True? 时 停止 . 当 条 件 的 值 非 True 非 False 时 , 循 
环 结构 不 微 任 和 何 工作 . 使 用 While 结构 ,循环 体 中 的 表达 式 可 能 一 次 也 不 做 ， 
也 可 能 永 无 止境 地 做 下 去 ， 
In[3] :=n=19;Whilef (n=Floor[n/2])! =0,Print[n]| 
Out[3] 一 8 
4 
2 
1 
For 语句 的 一 般 形 式 : 
Forf 初始 值 ,条 件 ,修正 循环 变量 ,循环 体 ] 
In[4] :=For[i=1;t=X,i^ 2<10,i 十 十 ,t= 二 t” 2 十 1;Print[tj] 
Out[4]=1+x: 
1 十 (1 十 x?)? 
1 十 (1 十 (1 十 x*)?)? 
Mathematica 中 的 For 和 While 和 C 语言 中 的 For 和 While 的 工作 方式 
大 致 相同 ,也许 你 已 经 发 现 记 有 不 同 之 处 , 逼 导 和 分 号 的 作用 在 Mathematica 
中 和 在 C 语言 中 正好 相反 ， 
重复 运用 函数 的 方法 
在 符 导 计算 语言 中 系统 提供 了 一 些 能 实现 循环 和 和 达 代 的 酒 数 , 在 计算 中 
常用 系统 函数 而 较 少 用 到 条 件 语句 或 循环 语句 ,一般 说 来 ,直接 调用 系统 函数 
总 比 构造 循环 语句 的 做 法 简单 .下 列 Mathematica 的 常用 迭代 函数 及 其 意义 . 


re ee oreemver 一 
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| 函数 | 意义 
Nest[f ,expr,n] | 对 表达 式 expr 作用 上 函数 mn 次 
NestList[f ,expr ,n |] | 从 表达 式 expr 运用 f 承 数 0 到 n ,并 给 出 列表 结果 
FixedPoint[f ,expr] | 从 表达 式 expr 开始 ,重复 运用 上 函数 , 直到 结果 不 变 
例如 : 
Inf5] :一 Nestftf ,x,S] 
Out[5] 一 LfLfLELfLx] 了 了 
In [6] :二 FixedPoint[Function[k,Print[Lxj;Floor[t/4jj,33](* 最 后 的 
结果 为 0#*) 
退出 循环 结构 
在 Mathematica 中 退出 循环 结构 可用 下 列 函 数 : 
Return[Lexpr] 退 出 溪 数 中 的 所 有 过 程 和 循环 ,返回 值 expr 
Break[] 结 束 本 层 循环 ,并 以 Null 为 结构 的 值 
Continue[ 1 转向 本 层 For 或 While 结构 中 的 下 一 次 循环 
Throw[expr] 返 回 expr 作为 最 近 的 外 层 的 Catch 的 值 
如 果 你 用 过 CC 语言 ,你 会 发 现 Return 、 Break 和 Continue 在 Mathemati- 
ca 中 的 工作 方式 与 蕊 语言 中 的 相同 . 
In[7] :=f[y_ ,x.]:=Block[ {t},t=D[Ly,x] :Hf[t= =0,Return[” x * 
* "7]]; 
t=t” 2 十 1;Return[t] 
In[8] :=f[6,x] 
Out[8] 一 # x* * 
In[9]:=t=1;Do[tx =k;Print[tj;lt[t>19, Break[. ]], {k ,10}] 
1 
2 
6 
Out[E9] 一 24 


得 程序 实例 

例 1: 计 算 一 组 数据 的 算术 平均 值 .几何 平均 值 . 中 差 、 方 益 和 标准 偏差 . 

程序 设计 如 下 ,并 取 Statisties. m 文件 名 保存 . 

Mean[list List] :一 Apply[Pius ,list]/Length[jist]( * 计 算数 据 list 的 
算术 平均 值 *) 

GeometricMeanflist List] :一 Apply[Times ,list] * (1/Length[list }) 

(x%* 计算 数据 list 的 几何 平均 值 * ) 
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Median[list_List] :二 Module[ {s1,len}, 
len 一 Length[list];s1 一 Sort[list |; 
If[OddQ[Length[s1]],si[ {len/2}], 
(sli[ [en/2]]+sif [len/2+1]1)/2] 
jj(x* 计 算数 据 list 的 中 差 x*) 
Variance[list List] :二 Mean[ (list 一 Mean[list])”2](x 计 算数 据 Jist 
的 方差 关 }》 
'Range [list List] :一 Apply[Max ,list] 一 ApplyLMin ,list ](* 计算 数据 
的 标准 偏差 * ) 
(# 'Range x Hides System'Range * * 》 
In[11 := <<Statistics. m 
In[2] :二 data=Table[Random[ ], {10}]; 
Inft3] := Mean[ data |] 
Out[3] 一 0. 359058 
In[4] :=GemetricMean[data | 
Out[4]=0. 257275 
In[5] :二 Range[data ]( x Statistics' 包 中 的 Range 函数 * 》 
Out[5]=0. 684207 
In[6] :二 System'Range[6](x 系统 中 的 Range 函数 *) 
Out[5]={1,2,3,4,5,6} 
例 2: 随 机 形成 矩阵 4,.,,n 二 10 计算 


141 = Max Dy leasl, | AN. = Max D>) lanl 
r=l 1 k=1 


In[1] :=f[M ]:=Max[TableL[Apply[Plus,Abs[M[Ik |]]|], {(k.,1,Length 
[LM]}]] 

In[2] :二 A 一 Table[Random[ ,110},{10)](x 随机 形成 给 阵 10.10 * 》 

In[L3] := 一 fLAJCx 计算 上 4. x*) 

Out[3] 一 3. 53473 

tn[4] :二 f[Transpose[A]]Cx*x 计 算 上 4， x*) 

Out[4]=3. 30627 

例 3: 作 Weierstracs 函数 图 象 , 并 取 不 同 的 r,s 观察 图 形 . 


f(x) = Prisin(tr), 1 <s < 2r>1 


天 =1 
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fLr_ ,s_]: 一 Sum[r”((s 一 2)k)Sinfr kk x],{k,1,100}] 
ff[x_ ] :一 f[1.2,1.S]itul 一 PlotLNLfE[x]], {x,—1,1)] 
ffix_] :=f[2.2,1.2];tu2=PIlot[N[Iff[x]], {x,—1,1}] 


(* 图 16 一 7*) 
例 4: 是 以 2r 为 周期 的 周期 两 数 ， 


一 1 一 FT 委 <0 
£(7} 一 
1,0 之 ZX 之 XT 
作出 的 Fourier 若干 项 展开 和 的 图 形 , 并 作 动 画 演 示 . 
gLx_] :=Which[x<“—2Pi,—1,—2Pi<=x<~Pi,1,—Pi<=x<0, 
1,0< 一 x<<Pi,1， 
Pi<=x<2Pi,—1,x> =2Pi,1] 
t1—=Plot[g[x], {x,— 3Pi, 3Pi} ,PlotStyle— > {RGBColor[1,0,0]}] 
Forfi=1,i<=30,i=i+ 10:;bn= {1—(—1)" n) * 2/n/Pi; 
h[x_j :=Sum[bn x Sin[n x x], {n,1,i}]; 
t2=Plot[h[x], (x,— 3Pi,3Pi} ,DisplayFunction >Identity]; 
Show{[t1,t2]g[x 1] :=Which[x<—2Pi,—1,—2Pi<=x<—?Pi,1,—Pi 
二 =X<0,—1,0<=x<Pi,l， 
Pi<=x<2Pi,—1,x> =2Pi,1] 
t1=Plot[gTLx], {x,— 3Pi, 3Pi} ,PlotStyle— > {(RGRBColor[1,0,0]}] 
For[i=1,i<=30,i=i+10;bn=(1—(—1)° n) x 2/n/Pi; 
h[x_]:=Sum[bn * Sin[n x x],{n,1,i}]; 
t2=Plot[h[x], (x, — 3Pi,3Pi} ,DisplayFunction— >>Identity |; 
Show[tti:t2]](x 节 省 篇 福 而 将 图 形 两 个 一 排 * ) 
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《rr 图 16 一 8<) 


单 击 网 形 最 右边 的 大 扩 号 , 单 击 动画 演示 按钮 ,此 时 屏幕 上 轮流 


显示 每 一 副 图 .产生 动画 的 视觉 效果 . 

通常 , 单 击 一 个 图 形 右边 的 大 护 号 , 按 住 Shift 键 单 击 第 二 个 图 形 右边 的 
大 扩 号 , 即 选 定 两 个 赂 形 . 选 定 几 个 图 形 后 , 单 击 动画 演示 按钮 或 按 
CarLHY , 则 轮流 显示 每 一 副 图 ,产生 动画 效果 . 在 主 菜单 Options 中 单 击 Ani- 
mation 调 出 动画 设置 对 话 框 , 可 在 框 上 设置 动画 运行 的 方向 、 锤 秒 显示 的 祯 
数 等 选项 值 . 
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